Dave, that line
Set c = Range("A2"), along with the lines

Do While Not IsEmpty(c) ,

Set n = c.Offset(1, 0) , and

Set c = n

was supposed to help the macro run until column A runs dry. Since c is
redefined everytime with the offset, how does that limit the code to
the single cell A2?

Joe.