Thanks again, Bill. I tried that and got the following error:
Run-time error '1004'
Select method of Range class failed
Against the Range("A1").Select comment.
The error did not occur when I commented out that command. It struck me
that I had the freeze panes on so I change A1 to A4 and tried again... no
luck.
I googled the error and OzGrid gave me a possible answer: change the line to
Sheets("sheet_name").Range("A4").Select
I did that and the macro now runs without error.