View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
GLT GLT is offline
external usenet poster
 
Posts: 12
Default Auto-Filter on multiple worksheets automatically via VBA

Hi,

I am trying to use VBA to select 4 worksheets and run an Autofilter in
Column H (column # 8) on each sheet.

Each sheet is labelled from Jobsheet 1 ... 4.

The Autofilter criteria is "ALL" or myDay1

myDay1 = variable which contains the first 2 letters of the day (ie. MO TU WE)

When I run this code, I get a runtime error 13. Can anyone tell what I am
doing wrong or a better way to write this code?

For daLoop = 1 To 4

jobStream = "Jobstream " & daLoop
MsgBox jobStream

Sheets(jobStream).Select
Selection.AutoFilter Field:=8, Criteria1:="ALL" Or myDay1

Next daLoop

Cheers,
GLT