Filtering

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

I have several spreadsheets in my workbook which have a column with the same
reference numbers.

It is frustating to filter each spreadsheet individually...

Is there a way to filter for a reference number (in all the spreadsheets
simultaneously) only by one action on the first spreadsheet?
 
Here's a simple example: (maybe you can apply it to your situation)
I have Sheet1, sheet2, sheet3
with autofilters on each sheet

I first named each Auto-filter on each page
MyData<< giving each a "Local" name
In the Name Box (for sheet2 for example) enter Sheet2!MyData
and in the RefersTo Box enter the Alter-Filter Range Including the header.

In my Sheet1 - Cell A1 I entered my Criteria: Y
My 3rd Column of my AutoFilters is a Y or N Column

Hope this helps;
Jim May

Sub tester
Dim Rng As Range
Dim ws As Worksheet
Dim ws1 As Worksheet
Dim MyData As Range
Set ws1 = Worksheets("Sheet1")
For Each ws In ThisWorkbook.Worksheets
Set MyData = ws.Range("MyData")
MyData.AutoFilter Field:=3, Criteria1:="=" & ws1.Range("A1").Value
Next ws
End sub
 
Back
Top