"ALL" value in a combo box for Excel

[MSIsam]

I created a form combo box that filters data in a spreadsheet and would like the first value to be "ALL". When selected, all the values would be shown. This is the code that I currently have:

Sub DropDown20_Change()
  Dim r As Range
  Set r = Range("DATASET")
  
  r.AdvancedFilter xlFilterInPlace, Range("ref")
  Range("A1").Select

End Sub

Any ideas?

Thanks,
Sam

 

[xlbo]

As this is VBA, please post it in the VBA forum: Forum707

Rgds, Geoff

We could learn a lot from crayons. Some are sharp, some are pretty and some are dull. Some have weird names and all are different colours but they all live in the same box.

Please read FAQ222-2244 before you ask a question