Autofilter contains vba strDept

M

Mark

Help Please!

I'm sure this is an easy one, but I'm going around in
circles and failing badly!!

I want to do an autofilter which contains a string which
is selected from a userform combo, the code I have do so
far is: -

Sub FilterTaskChart()

Worksheets("Task Chart").Visible = True
Worksheets("Task Chart").Activate

frmDept.Show

Worksheets("Task Chart").Range("A2").AutoFilter _
Field:=1, _
Criteria1:= * & strDept & *, Operator _
:=xlAnd

Range("A1").Select

End Sub

It fails on the 'wildcard string wildcard' bit.

Can anyone assist with a solution, please?


Mark
 
M

Mark

RADO,

It now runs but doesn't filter anything out and when you
hover the cursor over the strDept it doesn't pick what it
contains, any other ideas?

Mark
 
G

Guest

RADO,

Sorted it, thanks

I created another string which included the wildcards

Regards


Mark
 
T

Tom Ogilvy

That should be

Criteria1:= "*" & strDept & "*"

or
Criteria1:= "=*" & strDept & "*"
 
Top