السلام عليكم
الشكر موصول الى اخي احمد زمان
اخي الحامد الشاكر
هذا الملف يقوم بنسخ البيانات دون المعادلات
اما في ما يخص السطر
For t = 1 To 11
æÑÞÉ2.Columns(t).ColumnWidth = Columns(t).ColumnWidth
الرقم 11 هو عدد الاعمدة التي تنقل اليها البيانات في الورقة 2
و طلبنا من البرنامج ان يقوم بتحويل عرض كل عمود من الاعمدة الـ 11 في الورقة 2 الى نفس العرض الموجود في الورقة 1
تحياتي
Posting Data22.rar