مطلوب ترحيل بدون حذف البيانات وبنفس التنسيق

الحامد الشاكر · مايو 25, 2012

السلام عليكم ورحمة الله وبركاته

أخشى أن الموضوع قد تكرر طلبه ولكن أعتقد بحالات مختلفة مع العلم إلى أنني أطلعت على كثير من مشاركات الأخوة في المنتدى الكريم

أرفقت الملف الذي يشرح طلبي لما يخص ترحيل مجال من الخلايا.

وجزاكم الله خيراً

**أبو حنــــين** · مايو 25, 2012

السلام عليكم

جرب المرفق اخي

**احمدزمان** · مايو 25, 2012

وعليكم السلام ورحمة الله

رائع ابو حنين

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

الحامد الشاكر · مايو 26, 2012

الأخ أبو حنين المحترم

عمل أكثر من رائع .. جزاك الله خيراً

هل من الممكن توضيح ما يقصد بالسطر التالي داخل الكود :

For t = 1 To 11

æÑÞÉ2.Columns(t).ColumnWidth = Columns(t).ColumnWidth

وكيف التعديل في حالة نقل القيم بدون معادلات

مع فائق الإحترام

**أبو حنــــين** · مايو 26, 2012

السلام عليكم

الشكر موصول الى اخي احمد زمان

اخي الحامد الشاكر

هذا الملف يقوم بنسخ البيانات دون المعادلات

اما في ما يخص السطر

For t = 1 To 11

æÑÞÉ2.Columns(t).ColumnWidth = Columns(t).ColumnWidth

الرقم 11 هو عدد الاعمدة التي تنقل اليها البيانات في الورقة 2

و طلبنا من البرنامج ان يقوم بتحويل عرض كل عمود من الاعمدة الـ 11 في الورقة 2 الى نفس العرض الموجود في الورقة 1

تحياتي

الحامد الشاكر · مايو 26, 2012

جعلها يا أخي أبو حنين في ميزان حسناتك

يسر الله لك أمورك كيفما اتجهت

الردود الموصى بها