pedie
Well-known Member
- Joined
- Apr 28, 2010
- Messages
- 3,875
Code:
Sub Macro7()
Sheet1.AutoFilter
ActiveSheet.Range("$A$2:$T$6277").AutoFilter Field:=10, Criteria1:="Wk Data"
ActiveSheet.Range("$A$2:$T$6277").AutoFilter Field:=4, Operator:= _
xlFilterValues, [COLOR=blue]Criteria2:=Array(2, "9/22/2010")
[/COLOR]End Sub
Can the blue area be something like Criteria2:= Cell(1).value???