I am writing a macro to find duplicated values within a column, then paste the entire rows into a new sheet. I also need to delete the copied rows from the previous sheet.
Here is my macro so far:
Sub CutDuplicates()
'Updateby Extendoffice
Dim xRgS As Range
Dim xRgD As Range
Dim I...