Hi yet again,

I have had another look at this and I think that EntireRow should be with
your row selection.

Selection.Rows(intRow).EntireRow.Select
With Selection
.Insert
End With

Regards,

OssieMac


"OssieMac" wrote:

Hi again

Firstly I have been guilty of no reading the post properly. Again!!!. My
apologies for that. However, I did some testing and it appears to work
without the EntireRow.

Modify as per the following:-

With Selection
.Insert
End With

I'll be interested in your result because I have no idea why it does not
like the EntireRow. Your code appears to be selecting the row anyway.


Regards,

OssieMac