Add Autofilter to A1:Z1 on workbook

J

Jako

Please can someone tell me how to add an Autofilter on each worksheet in
my workbook (Programmatically) from A1 to Z1.

TIA
 
W

William

Hi Jako

Sub test()
Dim ws As Worksheet
For Each ws In Worksheets
ws.AutoFilterMode = False
ws.Columns("A:Z").AutoFilter
Next ws
End Sub

--
XL2002
Regards

William

[email protected]

| Please can someone tell me how to add an Autofilter on each worksheet in
| my workbook (Programmatically) from A1 to Z1.
|
| TIA
|
|
| ---
|
|
 
Top