مطلوب قيمة عدة خلايا تنزل في خلية واحده

[saud1]

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

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

 

مرفق مثال

 

تحياتي

coad1.rar

[احمد عبد الناصر]

السلام عليكم

 

جرب هذه 

 

=I6&H6&G6&F6&E6&D6

 

 

تحياتي

[جمال عبد السميع]

ولأثراء الموضوع طريقة أخرى لتختر ماتشاء

code2.rar

[حمادة عمر]

السلام عليكم

 

اخي الكريم / احمد عبد الناصر

جزاك الله خيرا   .... وبعد اذن حضرتك

 

اقدم هذا الحل بالاكواد بنفس المعادلة التي قدمتها بعد الضغط علي زر لعمل ذلك

 

الاخ الكريم / saud1

تفضل المرفق

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

 

 

 

coad1+.rar

[saud1]

الاخوان /
احمد عبد الناصر
mahmoud-lee
حمادة عمر
شاكر لكم تكرمكم
تحياتي

[أبو محمد أشرف]

الشكر موصول للجميع لكن الأخ حماده عمر لماذ لا يعمل الماكرو

[الـعيدروس]

السلام عليكم

 

الكود بيكون بهذا الشكل

 

 

Public Sub A_Add()

   [D8] = Join(Application.Index([D6:I6].Value, 0), "")

End Sub

 

[حمادة عمر]

السلام عليكم

الاستاذ القدير / عباد

 

حمد الله علي السلامه استاذنا

طالت غيبتك عنا

لعل غيابك عنا خيرا ان شاء الله

 

ودائما استاذنا عندما ترد فتبدع فعلي الجميع السكوت .... ليتعلم

 

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