Difficult to be certain without seeing the problem in the context of its workbook.

However what's the complete On Error Goto statement line?
Have you tried On Error Resume Next?

To prevent the error handler code running when the loop has finished you should always put an 'Exit Sub' line before the error handler.

Incidentally it's generally regarded as bad practice to use .Selects and .Activates since these slow down code. Most of the time these are not necessary and you can avoid them by referring directly to the object (Sheet, Range etc.).

If none of this helps upload the workbook.