I sent this originally to the worksheet funtions newsgroup but then
realised that it is probably more of a programming issue than a funtions
issue. So sorry for the double post...

I'm trying to get an advanced filter to work so that it will bring back
all records
with part of the word rather than just the start of a word. This works
very well when I use AutoFilter with the "Contains" criteria. But when I
do an advanced filter, only records that start with the word get filtered.

I have something like this:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count 1 Then Exit Sub
If Target.Address = "$A$2" Or _
Target.Address = "$B$2" Then
Range("Database").AdvancedFilter _
Action:=xlFilterInPlace, _
Unique:=False
End If
End Sub

This is code when you right click the tab. I tried putting "*" in various
places in
this code but can't get it to work. The only way is to put a "*" before
any word I'd
like to search for in the B2 or A2 cell. This works, but I'd like to be
able have it do it automatically so that I just have to type the word I'm
looking for without any "*"'s.

Thanks..