On Thursday, January 23, 2014 12:19:54 AM UTC-8, Claus Busch wrote:
Hi Howard,



Am Wed, 22 Jan 2014 23:54:25 -0800 (PST) schrieb L. Howard:



Works nicely. I could have sworn that I tried that all on one line as you point out. Not sure now.



you forgot the dot in front of Range in that line:

Set Grng = Range("G1:G" & .Range("G" & Rows.Count).End(xlUp).Row)



If you started the macro from another sheet which had no data in G the

macro failed.





Regards

Claus B.


Sorry, you lost me. Where was the . (dot) missing?

Also the macro is in the sheet module of Sheet1. And column G has no blanks until this snippet runs correctly, where it removes the X and other row data.

Howard