Add a row to multiple worksheets and copy some data drom the previous row

[iviv]

Hi all! I'm pretty new to VBA macors, I generally stumble my way around google to figure these things out which has got me so far but I've finally gotten stuck. So far, I have the following macro:

Please Login or Register  to view this content.

Based on a macro I found elsewhere and that I've tweaked to try and get it a little closer to what I need. The goal of the macro is that I can select a cell in Sheet1, click the macro button and then it will add a row above the selected row on both that sheet as well as sheets 3 & 4, copying the formatting from the previous row and also copying over the formula. The only small problem is that I don't want it to copy the formula from the whole row, only the first four columns, which is where my knowledge is lacking. I know I need to replace the EntireRow part of that line, but I can't figure out what to replace it with. And I'll be honest, I understand about 50% of the macro I posted above, it's just things I've found and seem to work, but if there's a cleaner/better way of doing then then I'll be glad to hear. Any suggestions would be appreciated!

Edit: While typing this out I was making occasional tweaks to the macro, and apparently managed break it at some point, I'll edit again once I manage to figure out what I did and get it back working again.

[StephenR]

Try amending this line

Please Login or Register  to view this content.

[iviv]

Hi Stephen,

Thanks for the fast reply. Unfortunately, your line doesn't appear to be working, though I believe this could be because I somehow mucked up another part of the macro. Originally just the line adding part was working, but for whatever reason it isn't now. The macro I posed above is correctly adding the line in the main Sheet1, but on sheets 2 and 4 it appears to be carrying out the two paste functions, but it isn't inserting a new row, meaning that it's overwriting the row with data from the previous row.