مبدع يحفظك ربي من كل شر ....والله العظيم من أمس وانا حايس حوسة لايعلم بها الا الله لانني حاولت ان اطبقها على برنامج لدي وماقدرت اخيرا قلت مالها الا مشرفنا اخوي علي السحيب والحمد لله رديت علي وحليت لي مشكلتي .. اضحك الله سنك وفرج همك.
اتمنى لو انك تشرح لي جزئية الكود الخاص ب vlookup لانني فعلا بجد ابي اعرفها حتى يمكنني من تطبيق الكود بعد ذلك على اي عمل يخصني ...
[D17:X20].clearcontents
For A = 4 To 24
For C = 17 To 20
Cells(C, A) = Application.WorksheetFunction.Vlookup(Cells(C, 3), æÑÞÉ6.[AC1:AZ4], A, 0)
Next
Next
وهل هي تعطي نفس نتيجة اisna vlookup.
وعلى فكرة انا محتفظ بكل روائعك التي تعتبر مرجع لايمكن الاستغناء عنه ولاتقدر بثمن.
واليوم عندي الفرحة فرحتين فرحة الامطار الغزيرة التي هطلت علينا في جدة ومكة المكرمة جعلها الله سقيا خير للبلاد والعباد وفرحة ردك الرائع .
تحياتي الغالية لك .