JohnZ1156
Board Regular
- Joined
- Apr 10, 2021
- Messages
- 160
- Office Version
- 2021
- Platform
- Windows
I have this VBA Script to copy "F1829:F1830" then AutoFill down the column to the last cell in the table.
Rather than always point to "F1829:F1830", I'd like it to be dynamic up an even number of cells up from the last row.
Sheets("Investments").Select
LR = Cells(Rows.Count, 1).End(xlUp).Row
Range("F1829:F1830").AutoFill Range("F1829:F" & LR), Type:=xlFillCopy
For example:
Goto last cell in Column F, go up 5 cells, copy that cell and the cell below it, AutoFill down to last cell in the column.
Rather than always point to "F1829:F1830", I'd like it to be dynamic up an even number of cells up from the last row.
Sheets("Investments").Select
LR = Cells(Rows.Count, 1).End(xlUp).Row
Range("F1829:F1830").AutoFill Range("F1829:F" & LR), Type:=xlFillCopy
For example:
Goto last cell in Column F, go up 5 cells, copy that cell and the cell below it, AutoFill down to last cell in the column.