Remove Duplicates command errors out

[mgw1138]

I process an input file created from a Database CSV file. This report has multiple cable Name entered Multiple times. After completion I want to remove duplicate cable names and put this in a Macro file by itself.

With Sheets("process")
.Unprotect
.Range("AE1").CurrentRegion.RemoveDuplicates Columns:=1, Header:=xlNo
.Protect
End With

I get an error that "This operation required the merged cells be identically sized".

There are no merged cells in column AE.

What am I missing.
Thanks
Michael

 

[arviy2k]

When you use .CurrentRegion, it will expand the selection to adjacent columns and rows that have data.

Try using

.Range("AE1:AE100").RemoveDuplicates Columns:=1, Header:=xlNo

(assuming your data has 100 rows - change 100 to last row of Column AE). If this works, then you can include code to figure out the last row of column AE and use that instead.

Regards,
ArvindYoga

 

[mgw1138]

Thanks,

When I recorded the macro a dialog box asked if I wanted to expand the selection and said "NO". I assumed that the non-expansion was the default since no parameter was added. I did not realize that sometimes Excel asks for information with dialogs that is not reflected in the generated macro code.

Thanks that is an excellent bit to know.
Michael