اذهب الي المحتوي
أوفيسنا

نسخ محتوى A الي C مع حذف ما هو موجود في A و B


ِMr.WzWz

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

السلام عليكم

اخي الكريم نفذ هذا الكود

()Sub mom1
Columns("A:A").Select
    Selection.Copy
    Columns("C:C").Select
    ActiveSheet.Paste
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
Columns("A:B").Select
Selection.ClearContents

End Sub
 

تحديد.rar

تم تعديل بواسطه طلعت محمد حسن
  • Like 1
رابط هذا التعليق
شارك

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information