تلوين الخلايا

[م.مهند القانوع]

الإخوة الكرام

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

عند تلوين الخلية A1 باللون الأحمر كيف يمكن ان تتلون الخلية D1 بنفس اللون و هكذا عند تلوين الخلية A2 باللون اصفر كيف يمكن ان تتلون الخلية D2باللون الأصفر مباشرة

و بارك الله فيكم

[عادل حنفي]

السلام عليكم

اخي

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

ارحو ان يكون المطلوب

تحياتي

الكود:

Private Sub Worksheet_Selectionchange(ByVal Target As Range)

Application.ScreenUpdating = False

For i = 1 To 1000

Cells(i, 3).Interior.ColorIndex = Cells(i, 1).Interior.ColorIndex

Next

Application.ScreenUpdating = True

End Sub

cell color.rar

[م.مهند القانوع]

كل كلمات التقدير تعجز عن شكر العظماء لكن لا نملك الا الدعاء

حياك الباري و زوجك الحواري و حفظك مسلم و البخاري و فتح الباري