السلام عليكم ..
كود بسيط لنسخ خلية
Sub S()
Sheets("WW").Range("D7").Value = Range("H10").Value
End Sub
بتغير الخلية H10 والضغط غلى زر الماكرو تنسخ الخلية H10 فى الخلية D7 فى ورقة WW
هذا الكود البسيط يعنى أن الخلية D7 فى ورقة WW تساوى الخلية H10 فى ورقة GG
** فلو أردنا استبد...