Hi RobinG

You can do this to filter each sheet with the same criteria

Sub Autofiltertest()
Dim FilterValue As String
Dim sh As Worksheet
FilterValue = "UK"

For Each sh In Sheets(Array("Sheet1", "Sheet2", "Sheet3"))
With sh
.AutoFilterMode = False
.Range("A:A").AutoFilter Field:=1, Criteria1:=FilterValue
End With
Next sh
End Sub



--
Regards Ron de Bruin
http://www.rondebruin.nl


"RobinG" wrote in message ...
I have a workbook with 3 worksheets.

Each worksheet has a column with Region as the heading.

I would like to be able to use autofilter on the first worksheet and have
the same region selected as the filter on the other two worksheets.

Any suggestions?