Error filtering for unique values

  • Thread starter Thread starter C. Corodan
  • Start date Start date
C

C. Corodan

I have the following code:

Range("D10").Select
Range("D10:D9999").AdvancedFilter Action:=xlFilterCopy,
CopyToRange:=Range( _
"D11111"), Unique:=True

The list of unique values always has a duplicate item at the beginning, fo
rexample:

A-Customer
A-Customer
B-Customer
C-Customer
D-Customer
Not assigned

Any idea what is the error?
 
Hi

The filter function see the first cell as a heading.

Expand your range to : D9:D999. Just notice that it will copy the filtered
range including the heading to the desired place.

Hopes it helps.

Best regards,
Per
 
Thanks, you are right!

Per Jessen said:
Hi

The filter function see the first cell as a heading.

Expand your range to : D9:D999. Just notice that it will copy the filtered
range including the heading to the desired place.

Hopes it helps.

Best regards,
Per
 
Back
Top