تحديث الصفوف عند عمل فلتر بعد فتح الملف

[أبو ليمونه]

السلام عليكم ،،،

 

اخواني اواجه مشكلة في الملف المرفق وهي كالتالي :

 

عندما اضع فلتر على العمود "مثال3" والفلتر المختار هو : اظهر الصفوف الفارغة ، يقوم الاكسل باظهرها 

 

ولكن 

 

عندما اكتب بتلك الصفوف الفارغة والفلتر مطبق ومن ثم اغلق الملف واحفظه ومن ثم اعد فتحه من جديد لا يظهر الصفوف الفارغة وانما يجب علي تطبيق الفلتر مرة اخرى "بمعنى يجب ان اختار الصفوف الفارغة من جديد"

 

سؤالي :

 

كيف اجعل الاكسل يحدث جميع الفلاتر في الملف عند اعادة فتحه ...

 

اتمنى انني وفقت لشرح المشكلة ...

 

وجزاكم الله خيرا

pro.zip

[أبو ليمونه]

السلام عليكم ،،،

 

اخواني اواجه مشكلة في الملف المرفق وهي كالتالي :

 

عندما اضع فلتر على العمود "مثال3" والفلتر المختار هو : اظهر الصفوف الفارغة ، يقوم الاكسل باظهرها 

 

ولكن 

 

عندما اكتب بتلك الصفوف الفارغة والفلتر مطبق ومن ثم اغلق الملف واحفظه ومن ثم اعد فتحه من جديد لا يظهر الصفوف الفارغة وانما يجب علي تطبيق الفلتر مرة اخرى "بمعنى يجب ان اختار الصفوف الفارغة من جديد"

 

سؤالي :

 

كيف اجعل الاكسل يحدث جميع الفلاتر في الملف عند اعادة فتحه ...

 

اتمنى انني وفقت لشرح المشكلة ...

 

وجزاكم الله خيرا

 

 

للفائدة يا أحبائي

 

وجدت الحل في هذا الكود

Private Sub Worksheet_Change(ByVal Target As Range)
    With ActiveWorkbook.Worksheets("Sheet1").ListObjects("Table1")
         .AutoFilter.ApplyFilter
    End With
End Sub