G
Guest
I am trying to create a macro to delete the duplicate rows in a sheet using
the Filter Unique Records Function. The following is the macro I have tried.
I keep getting an error at "ActiveSheet.Paste".
The duplicate data will not always be in side-by-side rows, and I cannot
sort the data without loosing the original order of the data.
Cells.Select
Application.CutCopyMode = False
ActiveSheet.ShowAllData
Selection.ClearContents
ActiveSheet.Paste
Application.CommandBars("Task Pane").Visible = False
Range("A1").Select
I would really appreciate any suggestions.
Thanks,
Lost In Alabama
the Filter Unique Records Function. The following is the macro I have tried.
I keep getting an error at "ActiveSheet.Paste".
The duplicate data will not always be in side-by-side rows, and I cannot
sort the data without loosing the original order of the data.
Cells.Select
Application.CutCopyMode = False
ActiveSheet.ShowAllData
Selection.ClearContents
ActiveSheet.Paste
Application.CommandBars("Task Pane").Visible = False
Range("A1").Select
I would really appreciate any suggestions.
Thanks,
Lost In Alabama