طلب مساعدة في جعل القائمة المنسدلة مفتوحة المدى و تسمية النطاقات مفتوحة المدى +جلب البيات

[BACHA22]

ممكن من الإخوة جلب البيانات من ملف إكسل أخر موجود في نفس المجلد

و ممكن جعل القوائم المنسدلة مفتوحة المدى كما أريد جعل تسمية النطاقات مفتوحة المدى

أي إضافة كود للتسمية يجعلها مفتوحة المدى أثتناء الزيادة أو النقصان

المطلوب في المرفقات

exl......rar

[BACHA22]

.................................

للرفع

==

تم تحرير المشاركة (الاشراف)

[أبو عبد النور]

السلام عليكم،

الطلب 2 في المرفقات.

ListsDefinition.rar

[BACHA22]

شكرا لك أخي ممكن شرح أو توضيح كيفية عمل الفكرة

[الـعيدروس]

السلام عليكم

تفضل الطلب الأول

AlI_C.rar

[BACHA22]

هناك خطأ في الكود للطلب الأول

[الـعيدروس]

شرط جلب البيانات

حسب إسم الملفات والمسميات

بيانات1 و بيانات2

اذا تم تغير إسم المفات أو شرط الإسم

يلزم تغيرها من الكود

    If [B4].Value = "جانفي" Then TY = "بيانات1"

    If [B4].Value = "فيفري" Then TY = "بيانات2"

جربت الكود يعمل مزبوط

[رجب جاويش]

الأخ الفاضل / العيدروس ( أبو نصار )

ما شاء الله كود رائع وجميل ويعمل بشكل ممتاز

بارك الله فيك

[أبو عبد النور]

شكرا لك أخي ممكن شرح أو توضيح كيفية عمل الفكرة

الامر يعتمد على حساب عدد القيم الموجود في المصفوفة ثم انطلاقا من الخلية الاولى لهذه المصفوفة يتم ازاحة الى الاسفل حسب عدد الخلايا الموجودة.

بعد اذان الاخ ابو نصار وللفائدة العامة اليك فكرة أخرى في كيفية تحويل معطيات من ملف2 الى ملف1

تحديث الملف1 من الملف2.rar

تم تعديل مارس 19, 2012 بواسطه apt