اذهب الي المحتوي
أوفيسنا

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

قام بنشر

السلام عليكم ورحمة الله

 

أخي الكريم، يمكن ذلك باستخراج قائمة جديدة للأسماء دون تكرارات (بمعادلات صفيف أو بمعادلات بسيطة مع أعمدة إضافية لتجنب التكرار) ومن هذه القائمة الجديدة وباستعمال النطاقات بالتسمية وبالمعادلة المناسبة نقوم  بإنشاء القائمة المنسدلة "بالتسمية" ونستعمل هذه التسمية لإدراج القوائم (باستعمال التحقق من الصحة  Validation) في أي خلية من الشيت أو من شيتات أخرى...

 

وإذا أردت الطريقة العملية لهذا الكلام ضع ملفا (مثالا) بالمرفقات نعمل عليه...

 

أخوك بن علية

قام بنشر

تفضل أخي:

 كود مميز لتعبئة اليست بوكس أو الكمبو بكس من عمود بدون تكرار

من مشاركة الأستاذ القدير شوقي ربيع  في:

المشروع الكبير (مكتبة الصرح .. زاخرة بالشرح) وهي عبارة عن تجميع لمكتبة الأكواد

http://www.officena.net/ib/index.php?showtopic=57935&p=370430

  • Like 2
قام بنشر

السلام عليكم ورحمة الله

 

في المرفق تجد ملف فيه تطبيق لما ذكرته في ردي السابق... وهو إنشاء قوائم منسدلة ديناميكية (مطاطية) دون تكرارات (ودون فراغات) باستعمال المعادلات... في شيت Feuil1 تم إنشاء القائمة List1 بمعادلة صفيف وفي شيت Feuil2 تم إنشاء القائمة List2 بمعادلات عادية مع عمود إضافي... أرجو أن يكون الحل مفهوما ويفي بالغرض المطلوب... ويبقى استعمال التسميتين List1 و List2 في خاصية "التحقق من الصحة"  Validation في أي خلية كانت من الملف... بطبيعة الحال يمكن أيضا استعمال الأكواد في هذا، مثل الكود الذي اقترحه أخي الكريم الجموعي من موضوع "المشروع الكبير للأكواد" جازاه الله خيرا وكل القائمين والمشاركين في هذا المشروع...

 

أخوك بن علية

 

الملف المرفق : قوائم منسدلة دون تكرار ودون فراغات.rar

  • Like 5
قام بنشر

السلام عليكم ورحمة الله

 

أخي الكريم، يمكن ذلك باستخراج قائمة جديدة للأسماء دون تكرارات (بمعادلات صفيف أو بمعادلات بسيطة مع أعمدة إضافية لتجنب التكرار) ومن هذه القائمة الجديدة وباستعمال النطاقات بالتسمية وبالمعادلة المناسبة نقوم  بإنشاء القائمة المنسدلة "بالتسمية" ونستعمل هذه التسمية لإدراج القوائم (باستعمال التحقق من الصحة  Validation) في أي خلية من الشيت أو من شيتات أخرى...

 

وإذا أردت الطريقة العملية لهذا الكلام ضع ملفا (مثالا) بالمرفقات نعمل عليه...

 

أخوك بن علية

هذا هو الملف اخي الاستاذ الكبير بن عليه ارجو ازالة علامة الخطأ التي تظهر في القائمة المنسدله والشكر واصل الى كل من شارك في هذا الملف

قائمة مطاطة خاليه من ظهور علامات الخطأ.zip

قام بنشر (معدل)

السلام عليكم ورحمة الله

 

 

هذا هو الملف اخي الاستاذ الكبير بن عليه ارجو ازالة علامة الخطأ التي تظهر في القائمة المنسدله والشكر واصل الى كل من شارك في هذا الملف


 

 

أختي الكريمة، أعتقد أن الملف المرفق ليس هو الملف المطلوب... لأني لا أجد قائمة منسدلة فيه والملف يتعلق بالفلترة... أرجو تصحيح المعلومة...

 

 

أخوك بن علية

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

السلام عليكم ورحمة الله

 

أختي الكريمة إيناس، معذرة على هذا الخلل، بالنسبة للملف تم عمل المطلوب بإضافة التسمية List على القائمة المنسدلة (المرتبة تصاعديا)... أرجو أن يكون هذا المطلوب...

 

أخوك بن علية

 

 

الملف المرفق : قائمة بدون تكرار.rar

  • Like 2
قام بنشر

السلام عليكم ورحمة الله

وعليكم السلام ورحمة الله وبركاته

لعند فتح الملف تاتي برسالة الخطأ المرفقه

أختي الكريمة إيناس، لست أدري موضع المشكل عندك ربما يكون مستوى أمان الماكرو لأن عندي الملف يعمل جيدا... المهم أعيد إرفاق الملف من جديد... وأرجو أن يعمل معك هذه المرة...

 

أخوك بن علية

 

الملف المرفق : قائمة بدون تكرار_2.rar

 

  • Like 1
قام بنشر

تفضلوا قائمة منسدلة بدون أعمدة مساعدة وبدون الاستعانة بورقة العمل ، ومنقحة وبلا فراغات وبها قيم فريدة أي غير مكررة وعلاوة على كل ما سبق مرتبة أيجدياً..

إليكم الملف المرفق

Unique Sorted Validation List.rar

  • Like 2
  • Thanks 1
قام بنشر

 

تفضلوا قائمة منسدلة بدون أعمدة مساعدة وبدون الاستعانة بورقة العمل ، ومنقحة وبلا فراغات وبها قيم فريدة أي غير مكررة وعلاوة على كل ما سبق مرتبة أيجدياً..

إليكم الملف المرفق

رائعه رائعه جزاك الله خيرا

الملف المرفق يحتاج ان تكتب هذه القائمة في الخلايا ابتداء من S8  و S9 و S10  وهكذا

قام بنشر

بسيطة جدا

قومي بتغيير هذا السطر ليناسب طلبك

    With Sheets("الاوائل").Range("S7:S100").Validation

مع مراعاة تحديد الخلايا المراد عمل قائمة منسدلة لها وجعل التنسيق كنص Text ، ومن التبويب Home انقري Left-To-Right Text Direction واختاري Right-to-Left

قام بنشر (معدل)

بسيطة جدا

قومي بتغيير هذا السطر ليناسب طلبك

With Sheets("الاوائل").Range("S7:S100").Validation

 

مع مراعاة تحديد الخلايا المراد عمل قائمة منسدلة لها وجعل التنسيق كنص Text ، ومن التبويب Home انقري Left-To-Right Text Direction واختاري Right-to-Left

اقتباس

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

تم تعديل بواسطه inas aly
قام بنشر

إذا كنتي كما تقولين لحاولتي أولاً ثم إذا تعثر الأمر طلبتي المساعدة

الموضوع مش محتاج ملف مرفق لأني أرفقت ملف بالفعل من قبل في المشاركة رقم 16

افتحي المصنف ، ادخلى على محرر الأكواد Alt + F11 ، دبل كليك على موديول رقم 1 تقريبا مش متذكر

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

في ورقة العمل قومي بتنسيق هذه الخلايا حتى لا تظهر البيانات في القائمة المنسدلة على شكل شهور ..عن طريقة كليك يمين على الخلايا ثم تنسيق خلايا Format cells ثم اختاري Text ثم ومن التبويب Home انقري Left-To-Right Text Direction واختاري Right-to-Left

إذا لم يفلح الأمر ستجدين المساعدة بعون الله

تقبلي تحياتي

قام بنشر

الموضوع مش محتاج ملف مرفق لأني أرفقت ملف بالفعل من قبل في المشاركة رقم 16

افتحي المصنف ، ادخلى على محرر الأكواد Alt + F11 ، دبل كليك على موديول رقم 1 تقريبا مش متذكر

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

في ورقة العمل قومي بتنسيق هذه الخلايا حتى لا تظهر البيانات في القائمة المنسدلة على شكل شهور ..عن طريقة كليك يمين على الخلايا ثم تنسيق خلايا Format cells ثم اختاري Text ثم ومن التبويب Home انقري Left-To-Right Text Direction واختاري Right-to-Left

إذا لم يفلح الأمر ستجدين المساعدة بعون الله

تقبلي تحياتي

ارجو ان تسامحني وتبحث لي عن عذر لتتقبل سؤالي .. حضرتك من القمم وهذا قدر القمم ان تتحمل البسطاء

الاسطر التي سطرتها حضرتك في هذه المشاركة  السابقه تعتبر درسا مفيدا

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

قام بنشر

يا أخت إيناس

أنا لا من القمم ولا أي شيء من هذا القبيل

أنا مجرد تلميد وكل يوم بحاول أتعلم شيء جديد

بس يا ريت لو فعلا عايزة تتعلمي يبقا لازم تحاولي وتحاولي وتفشلي

ومش مهم الفشل لأن الفشل بداية النجاح

المهم أن تطبقي الخطوات ولو فيه حاجة صعبة ستجدين المساعدة إن شاء الله

  • Like 2
قام بنشر

قمم متواضعه جدا والله انتم خير صحبه

رب اخ لم تلده امك فعلا

استاذ ياسر انت قمه فعلا ولكنك متواضع تواضع الكبار

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