hamady66

جزيت خيرا وفقك الله

السلام عليكم هذا الكود يغير تنسيق الخلية الفعالة Private Sub Worksheet_SelectionChange(ByVal Target As Range) ......................... Target.Font.Bold = True Target.Interior.ColorIndex = 6 Target.Font.Color = 255 Target.Font.Size = 15 End Sub لكنه ناقص ويحتاج مكان النقاط الى كود يعيد جميع خلايا الصفحة الى حالة التنسيق الطبيعية باستثناء الخلية المختارة شكرا