emanfci

سيدي الفاضل أعرف أنني أثقلت عليك أريد أن انسخ محتويات هذا الشيت 120 مرة في نفس الشيت مع مراعاه نسخ المعادلات و التنسيقات مع تثبيت جزء الدباجه العلوية و أسماء المواد كما هو بالملف المرفق يناير2017.xls

جزاك الله كل الخير و متعك بالصحة و العافية أستاذي الفاضل تم تشغيل كل الأكواد بنجاح

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

تسلم أخي علي مجهودك و سعة صدرك ولكن المطلوب ليس تكرار الاسماء في الصف الفارغ ولكن دمج خلية الاسم مع الخلية التي تليها لتصبح خلية واحدة بها اسم واحد كما هو موضح بالشيت المرفق Book1.xlsx

يا فندم هو نفس الملف المسمي sheet1 المدرج به جميع الاسماء لقد قمت بعمل صف زائد تحت كل اسم ثم قمت بدمج كل اسم بالصف الفارغ الذي يليه يدويا كل اسم علي حده عن طريق الامر merge هذا بالنسبة لل 20 اسم الاولي تقريبا, ولكن اريد ان انفذ هذا علي باقي الاسماء عن طريق كود يفعل ذلك مرة واحدة

جزاك الله خيرا أخ سليم انا لم أقصد إلغاء الدمج بل أريد تنفيذ الدمج علي كل الأسماء لأنها سترحل في شيت الكنترول في خلايا مدمجه

جزاك الله خيرا يا أخي الكود تمام و لكن هل هناك حل لمشكلة الدمج

اخواني الافاضل احتاج لمعادلة أو كود استخدمه لنقل بيانات من شيت لشيت اخر و لكن مع مراعاة: هناك 1200 اسم تقريبا في الشيت الأول عند النقل يأخذ كل 10 أسماء و يضعهم فى المكان المقابل لهم في الشيت الاخر مع مراعاة وجود عدد 6 صفوف للدباجه بين كل مجموعه و الاخري طلب اخر بعد اذنكم لدي 1200 اسم تحت كل اسم صف فارغ اريد كود أو معادلة لدمج كل صف مع الذي يليه وجزاكم الله خيرا تم حذف المشاركة الأخرى لأنها مكررة مع هذه المشاركة ..من فضلك لا تكرر نفس المشاركات يناير2017.rar