Copy and Past Formulas

[scrabtree23]

I have formulas in cells A5:H5. I need to copy and paste the formulas into cells A6 through the last cell down with content in it in column H.

[rondeondon]

if you particularly want to do this with a macro, to find the last row use the ActiveSheet.Cells.SpecialCells(xlLastCell).Row
then you want to copy paste special for just formulas. let me know if there's something you need to know more about.

can use the line above as part of a select statement for pasting something like this.
range(cells(5,1),cells(ActiveSheet.Cells.SpecialCells(xlLastCell).Row,5).pastespecial

I have not tested this as yet, can go further if needed

[Arkadi]

Another option:

Please Login or Register  to view this content.

[rondeondon]

Hi Arkadi
I avoided using that end(up) technique for finding the last cell as I work with a lot of incomplete data.

[Arkadi]

@rondeondon, fair enough... but if the user truly wants the last cell in a column, then that method works well, even if there are blank cells in the data, because it looks from the bottom upwards. Your method is often better if looking across multiple columns though, because yes, the xlUp method does require a column that is guaranteed to have data in the bottom row.