كود بسيط للنسخ

[samycalls2020]

السلام عليكم ..

كود بسيط لنسخ خلية

Sub S()
    Sheets("WW").Range("D7").Value = Range("H10").Value
End Sub

بتغير الخلية H10 والضغط غلى زر الماكرو تنسخ الخلية H10 فى الخلية D7 فى ورقة WW

هذا الكود البسيط يعنى أن الخلية D7 فى ورقة WW تساوى الخلية H10 فى ورقة GG

** فلو أردنا استبدال  الخلية المعطى H10 فى ورقة GG بخلية أخرى فى ملف أخر .. وليكن خلية C8 فى

ورفة BB فى ملف CUSTOMER  .. فكيف يكون الكود ؟؟

** أو العكس استبدال الخلية المستقبل D7 فى ورقة WW بخلية أخرى فى ملف أخر .. وليكن خلية C8 فى

ورفة BB فى ملف CUSTOMER  .. فكيف يكون الكود ؟؟

CUSTOMER.rar

تم تعديل أغسطس 21, 2017 بواسطه samycalls2020

[samycalls2020]

للرفع

[samycalls2020]

للرفع

[samycalls2020]

للرفع

أكرمكم الله

[samycalls2020]

للرفع

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

[samycalls2020]

للرفع

[samycalls2020]

للرفع 

كل عام وأنتم بخير

[samycalls2020]

للرفع 

للرفع للرفع للرفع للرفع للرفع للرفع 

للرفع للرفع للرفع للرفع للرفع للرفع

[samycalls2020]

للرفع

[samycalls2020]

للرفع

أعزكم الله

[samycalls2020]

تجاهل مؤسف

[حسام الدين الحسيني]

بارك الله فيك

 

[samycalls2020]

أعود بالأمل من جديد ..

وأرجو من الأخوة الأفاضل مساعدتى فى الوصول للحل

[samycalls2020]

للرفع