recurrance w/im MACRO

[THEBookMan]

I have a large CALC fole with 15,000 rown in a column.

I would like to make a macro to locate and delete all of the duplicates.

Here is what I have:

<<< Macro to delete contents of the cell to the right of a cell with the value of “.X.” (DUP column), move back to 'DUP' column, then repeat until 'DUP' cell = “”(blank or null). It thends.

Manually highlight cell at top of 'DUP' column to be processed.

Run Macro( DelDups)

1. <CTRL-F>					Open 'FIND' dialog
2. Enter '.X.' into “FIND WHAT” window
3. √ “MATCH CASE” box
4. Click “MORE OPTIONS” button
5. Change “SEARCH IN” to values		default is formulas
6. click 'Columns' button			searches columnwise
7. click 'FIND'				locates first cell in that column that has value of '.X.'
   1. <TAB>, <TAB>		moves focus 1 cell right
   2. <DELETE>, <ENTER>	deletes contents of cell
   3. <SHFT>-<TAB>		Moves focus 1 cell to left ('DUP' column)
   4. test if this is last cell in this column that is not “” (blank, null)
      1. if yes – end macro
      2. else. Got to #7 (click 'FIND')

Everything up to 7.3 works, but I have to re-instantiate the macro to continue.
Problem is that I don't know how to make the macro jump back to step #7. "FIND" and continue until 7.3.1 = 'YES'.
Then, what is the command to end the MACRO?


Any help is much appreciated,
⌡im [THE BookMan]

PS indents deleted upon 'SUBMIT'

[RoryOF]

PS indents deleted upon 'SUBMIT'

If uploading a code or formatted extract, use

Code: Select all

tags to surround it. These are available as a button on FullReply and PostReply screens, but can be manually inserted on QuickReply screen.

[Zizi64]

Try the Data - Filter - Standard Filter with options "Non empty", "No duplication", "Copy results to"