It needed a Dim statement for the ws which I put in before the first
line of code, but when I ran the code  it got stuck on the first sheet
and was looping continuously. The debug highlighted "Next rw" and
yet this worked ok when I was only running my code on a single sheet.

Yes I did mean that I wanted the code to start with the first sheet
and work through every sheet in the workbook.

Could you help  a little more with this.