السلام عليكم
الاخ الكريم / kashef
بارك الله فيك
وبعد اذن الاستاذ العملاق الفارس / رجب جاويش ... جزاه الله خيرا
اليك اخي ما طلبت ( علي حسب فهمي للطلب الاخير ) هو نفس كود الاستاذ / رجب ولكن يتم استدعاؤه في حاله تغيير اي بيانات في الورقة
تلقائيا بدون ازرار
ويمكنك ذلك بوضع الكود التالي في حدث الورقة sheet1 كالتالي
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.ScreenUpdating = False
Call RG_Hide
Application.ScreenUpdating = True
End Sub
ارجو ان يفي بطلبك
جزاك الله خيرا