اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

شرح الكائن collection - تعبئة كمبوبوكس بقيم فريدة غير مكررة


الردود الموصى بها

السلام عليكم

هذا الفديو كان بالخطة من فترة طويلة

ولماأذن الله سبحانه و تعالى

خرج إلى النور

أرجو أن تنتفعوا به

نتعلم فى هذا الفديو

أشياء كثير من الأسهل للأصعب

1 - ربط كمبوبوكس بنطاق خلايا فيه عناصر مكررة

2 - الحصول على قيم غير مكررة باستخدام collection

3 - ربط الكمبوبوكس بقيم غير مكررة

4 - لأول مرة على الهواء مباشرة مراقبة المتغيرات أثناء عمل البرنامج لتحديد الخطأ

الفديو طويل بلغ الحد الأقصى لطول الملف بيوتيوب 15 دقيقة تقريبا

أرجو أن تتسامحوا معى فى أى أخطاء ترد فى الشرح فنحن جميعا تلامذة فى هيك باب باب vba

جزاكم الله خيرا

الملف المستخدم بالشرح تجده بالمرفقات

الآن إلى الفديو

how to use collection.zip

تم تعديل بواسطه kemas
رابط هذا التعليق
شارك

الفاضل / أبو عمر

كل عام وأنتم بخير

برجاء الاكثار من الشرح فيديو بصوتكم المميز وخاصة الأكواد وإيضاح الفرق بين الأحداث

بالمناسبة كل الفيديو على اليوتيوب حملته وهو ممتاز

وفقكم الله فى أسمى رسالة

** أخوكم جمال دغيدى

تم تعديل بواسطه دغيدى
رابط هذا التعليق
شارك

شكرا أخانا الفاضل الأستاذ دغيدى

أنت تعرف ما يعانيه المعلمون من ضيق الوقت

و أنا أقوم بتسجيل ما تيسر عندما أجد وقت الفراغ المناسب

و إن شاء الله نكمل المسيرة

وشكرا لتحميل الفديوهات ( أرجو أن تعلمنى كيف حملتها ؟)

أخى قصى

مشكور جدا لمرورك الطيب

أحسن الله إليكم

رابط هذا التعليق
شارك

الفاضل / أبو عمر

كل عام وأنتم بخير

حملت الشرح من قناتكم على يوتيوب بواسطة الداونلود مانجر IDM بكل سهولة ويسر

أخوكم ** جمال دغيدى **

رابط هذا التعليق
شارك

ببساطة كرر سطر الإضافة مع تغيير رقم الكمبوبوكس

Me.ComboBox2.AddItem Item
و
Me.ComboBox3.AddItem Item
و هكذا ولو كانت أكثر من ذلك كـ 7 مثلا يمكنك عمل حلقة
For Each Item In coll

For i = 1 To 7

Me.Controls("ComboBox" & i).AddItem Item

Next i

Next Item

End Sub

تم تعديل بواسطه kemas
رابط هذا التعليق
شارك

استاذى كيماس

شكرا على الاستجابة

وبعد اذنك فى هذه الحالة ستاخذ كل كومبوبكس قيمته من نفس العمود A

ولكن المطلوب ان يأخذ كل كومبوبكس قيمته من عمود مختلف

يعنى :

كومبوبكس 1 يأخذ قيمته من عمود A

كومبوبكس 2 يأخذ قيمته من عمود B ....وهكذا

ارجو ان يكون المطلوب واضح

رابط هذا التعليق
شارك

أنت جررتنا لبرنامج كامل

لكن هذا - بتوفيق الله ما طلبت

سنحول الكود السابق إلى وظيفة

يمكن استدعاؤها بأى عدد تريده من الكمبوبوكس

طبعا حسب عدد الكمبوبوكس على الفورم

شاهد المرفق

الملف

how to use collection متعدد تعبئة سلسة من الكمبو بوكس.zip

رابط هذا التعليق
شارك

السلام عليكم

استاذنا العزيز

بارك الله فيك وجعله فى ميزان حسناتك

كل الشكر لك ولى طلب اعتقد انه مطلب الكثير ممن هم مثلى

ياريت تنزل الشرح للكود فيديو

طبعا انا مش عارف يعنى ايه تحويل الى وظيفه

معلوماتى فى الاكواد تكاد تكون صفر لكن انا باحاول استفيد من الاكواد فى عملى

وبجاهد علشان افهمها. وطبعا الشرح بتاع حضرتك سهل لى حاجات كتير

اكون شاكر ليك اذا تم تنفيذ المطلوب .على حسب سعة وقتك

واسف على الاطالة والف شكر مره اخرى

رابط هذا التعليق
شارك

أخانا الفاضل yamz

شكرا لك

أحب أن أخبرك أننا هنا كلنا متعلمون

يفيد بعضنا بعضا قدر الاستطاعة

هناك وظائف فى إكسل أنت تستخدمها فعلا

مثل

sum

if

و عند استخدامها أنت تعطى الدالة بعض المعاملات

لتعطيك نتائج

مثلا دالة sum

تعطيها عناوين الخلايا المراد جمعها

فتعطيك ناتج الجمع

ويمكن عمل وظائف للمستخدم يكيفها حسب طلبه

مثلا هنا

عملناوظيفة تقوم ب

إنشاء مجموعة من مدى معين ( أى مدى )

وضع هذه المجموعة فى كمبو بوكس ( أى كمبو بوكس)

و استدعينا هذه الوظيفة بذكر

اسمها

المعاملات التى تحتاجها و هى

المدى المحدد

اسم الكمبوبوكس

يمكنك الاستفادة من الإخوة هنا وهم أساتذتنا

و يمكنك مشاهدة باقى الفديوهات فى قناتى بتوقيعى

أرجو لك التوفيق

تم تعديل بواسطه kemas
رابط هذا التعليق
شارك

  • 5 years later...

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information