Hi,
I have a sheet with various monthly data time series in which each cell refers to another sheet linked with Bloomberg (automatic update).
When I want to update this sheet, I usually dragdown the last data formula in each column by one month as shown here:
(see red arrows)
http://www.emfin.com/dragdown.gif
However, doing this manually can take up to 1 hour with more than 400+ columns so I was wondering if I could have a macro that would do all this at once?
I found on another thread this macro:
Sub Fill_Lastrow()
Sheets("Sheet1").Range("A65536").End(xlUp).Select
Selection.AutoFill Destination:=Range("A" & ActiveCell.Row & ":A" & ActiveCell.Row + 1), Type:=xlFillDefault
End Sub
This macro above works but only for column A. However I have column A to OZ. How can I get the last data point of each column to be dragged down by 1 month and autofilled?
Can someone show me a modified version of the code above if possible so it works for many columns instead of just one?
Thanks alot for the help!
Bookmarks