Paul,
Absolutely PERFECT! Thank you so very much. I will analyze every line of
code to learn, but it worked just as I needed.
Thank you again.
John
On Wednesday, May 21, 2014 2:10:55 PM UTC-4, Paul Schreiner wrote:
> This macro seems to work with the sample data:
>
> Option Explicit
This macro seems to work with the sample data:
Option Explicit
Sub Cleanup()
Dim R, nRows
Dim C, nCols, C2
Dim bFlag
nRows = ActiveCell.SpecialCells(xlLastCell).Row
nCols = ActiveCell.SpecialCells(xlLastCell).Column
For R = 2 To nRows
If (Cells(R, "A").Value & "X"
