Hide same rows in Sheet2 after Filtering Sheet1

[armando]

Hi!, and Thanks in advance for any help.!

In Sheet1 I have some columns of data that I Filter by criterias choosen in other columns in the same Sheet1.

What I need is each time I filter in Sheet1, I want Sheet2 to hide the same rows that were hidden in Sheet1.

I have formulas in Sheet2 referring to data in Sheet1. And I want Sheet2 to show only the same rows that are shown in Sheet1.

 

[jimboy]

This will hide the same row as sheet1 (in range A1:A50), but you need to run it manually. You could put it in Sheet2 worksheet event (on activate)

Sub Macro1()
Dim c As Range
For Each c In Sheets("Sheet1").Range("A2:A50")
If Rows(c.Row).Hidden = False Then
Sheets("Sheet2").Rows(c.Row).Hidden = False
Else
Sheets("Sheet2").Rows(c.Row).Hidden = True
End If
Next c
End Sub

If you right mouse over Sheet2 and select view code, then paste this in, it will run when you select Sheet2...

Private Sub Worksheet_Activate()
Application.ScreenUpdating = False
Rows.Hidden = False
Dim c As Range
For Each c In Sheets("Sheet1").Range("A2:A50")
If Sheets("Sheet1").Rows(c.Row).Hidden = True Then
Sheets("Sheet2").Rows(c.Row).Hidden = True
'Else
'Sheets("Sheet2").Rows(c.Row).Hidden = True
End If
Next c
Application.ScreenUpdating = True
End Sub

Not very fast tho'!