Question : Excel Visual Basic

I have two selection boxes for users to pick two options and then run a macro that will bring back the data by auto filtering on those two values being passed. That works fine. The problem is that I want the user to be able to have the option to just run it based on one selection box if they don't need the other filter. I tried having the second value pass "(All)" if it was not selected on by the user, thinking it would select the top option of (All) on the second filter, thus not really filtering, but it is not recognizing it. It doesn't error, it just doesn't bring back any data as it doesn't recognize the (All) option. Below is my code

Dim str As String
Dim str2 as String
str = Range("G8").Value
str2 = Range("G9").Value

Sheets("Del Perf Raw Data (2)").Select
Cells.Select
Selection.ClearContents
Range("A1").Select
Sheets("Del Perf Raw Data").Select
Selection.AutoFilter Field:=10, Criteria1:=str
Selection.AutoFilter Field:=6, Criteria1:=str2

Answer : Excel Visual Basic

What about doing something where you check if a box is all.

I'm not sure if filtering on a blank value will give you what you want, but you could check if str or str2 is blank later on and adjust accordingly.

Hope this helps.

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:



If Range("G8").Value="(All)" then
   str = ""
else
   str = Range("G8").Value
end if
If Range("G9").Value="(All)" then
   str2 = ""
else
   str2 = Range("G9").Value
end if

Open in New Window

Select All