اجبار الخلية على تنسيق محدد

[مستر ابو مرمر]

ارجو منكم المساعدة في كود يسمح بقبول نسق معين للخط مثل النوع و الحجم ، و في حالة النسخ من ملف اخر و اللصق اليه يعدل هذا التنسيق للنوع المحدد في هذا الملف ، بمعني ان الخلية A1 مثلا اريد ان يكون نوع الخط فيهاtimes و اريد ان انسخ اسماء مكتوبة بنوع اخر ، فالمطلوب انه بعد النسخ يتغير نوع الخط بالذي حددته مسبقا؟؟؟

[أ / محمد صالح]

يمكنك تسجيل ماكرو لتسيق الخلية المطلوبة بالتنسيق المطلوب 

وفي كل مرة يتم اللصق تقوم باستدعاء الماكرو

تم تعديل مايو 20, 2017 بواسطه أ / محمد صالح
وجود خطأ إملائي نتيجة سرعة الكتابة

[حساسينو]

تفضل يا أخى.... 

كود يسمح بقبول نسق معين للخط مثل النوع و الحجم.rar

[سليم حاصبيا]

ربما ينفع هذا الماكرو

Sub copy_format()
 Range("A1").Copy
    Selection.PasteSpecial Paste:=xlPasteFormats
End Sub