Advanced filter problems!!!

[cdhoughton]

Hi all

I'm having a few problems with AdvancedFilter

I have the following code

With Sheets("Staff") 
      .Range("A:A").AdvancedFilter _
         Action:=xlFilterCopy, CopyToRange:=.Range("B1"), Unique:=True
      
End With

However when the range is copied it duplicates the first value in the list?

Any idea why this is happening?

Cheers in advance

Chris

 

[Norie]

Chris

Does your list have a header?

If it doesn't then VBA will treat the first value as the header, and that's probably why you get the duplication.

Advanced filter requires a header really.

 

[cdhoughton]

Cheers Norie, I think that has fixed it!