VBA problem (auto hide & unhide) in tables

[ME ON EXCEL]

Hello,
please I need your help

the macro is not working on several tables
there is a way to solve it?
what i want is automatically in all tables when cells in column (I) contains (1) it will be hidden and unhide it when contains (0)
Thank You

 

[Marc L]

Hello, which procedure ?!​

​

According to the Macro Recorder a VBA demonstration :​

Sub Macro1()
         Dim Tbl As ListObject
    For Each Tbl In Sheet1.ListObjects
             Tbl.Range.AutoFilter 9, 0
    Next
End Sub

Do you like it ? So thanks to click on bottom right Like !
​

 

[ME ON EXCEL]

Hello, which procedure ?!​

​

According to the Macro Recorder a VBA demonstration :​

Sub Macro1()
         Dim Tbl As ListObject
    For Each Tbl In Sheet1.ListObjects
             Tbl.Range.AutoFilter 9, 0
    Next
End Sub

Do you like it ? So thanks to click on bottom right Like !​

​

Hi Marc L,
no it didn't work

I want rows to be filtered automatically if the formula in column I gives number 1 OR if cells in column A are blank.

one of the two
thank you for helping

 

[Marc L]

As it well works on my side according to your initial post with 1 or 0 - obviously you can also try with "<>1" -​

so activate the Macro Recorder and filter manually in order to see the mod to apply to the procedure …​

For more help indicate at least your Excel version in order someone else with a closest version can give it a try.​

​