عمل إخفاء للحقول التي قيمتها صفر أوتماتيكيا

[مهند الزيدي]

السلام عليكم ... مساعدتي في عمل المطلوب داخل المرفق

جدول.rar

[عبدالله المجرب]

السلام عليكم 

استعمل هذا الكود في زر امر لاخفاء الصفوف 

Sub Hide()
For Each cl In [G5:G300]
If cl = 0 And cl <> "" Then cl.EntireRow.Hidden = True
Next
End Sub

وهذا الكود في زر أمر للاظهار

Sub Show()
 [G5:G300].EntireRow.Hidden = False
End Sub

[وليد فتحي]

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

اتفضل اخي الفاضل لعله المطلوب

جدول_11.rar

[وليد فتحي]

 

السلام عليكم 

استعمل هذا الكود في زر امر لاخفاء الصفوف 

Sub Hide()
For Each cl In [G5:G300]
If cl = 0 And cl <> "" Then cl.EntireRow.Hidden = True
Next
End Sub

وهذا الكود في زر أمر للاظهار

Sub Show()
 [G5:G300].EntireRow.Hidden = False
End Sub

 

استاذ عبدالله

عذرا لم أري مشاركتك

جزاك الله كل خير وزادك من علمه

[محمد ابو البـراء]

استاذ // عبد الله المجرب

استاذ // وليد فتحي

بارك الله لكما

وجزاكما عنا خيراً

[وليد فتحي]

 

استاذ // عبد الله المجرب

استاذ // وليد فتحي

بارك الله لكما

وجزاكما عنا خيراً

 

 

 

جزاك الله كل خير أخي الحبيب محمد أبو البراء

[مهند الزيدي]

إخواني الأعزاء عبد الله المجرب . وليد فتحي شكرا لكم على الرد الجميل والسريع .. ادامكم الله للعلم .. ورزقكم الصحة  والعافية ...

[وليد فتحي]

إخواني الأعزاء عبد الله المجرب . وليد فتحي شكرا لكم على الرد الجميل والسريع .. ادامكم الله للعلم .. ورزقكم الصحة  والعافية ...

 

جزاك الله كل خير أخي الحبيب ورزقك بالصحة والعافية