paste Down Formula

[waxb18]

Hi Guys,

im having a little difficulty at a basic step in macros.
All i want to do is paste down the formula in cell V2 to the bottom of the data, but it keeps going all the way down to row 1 million or so.

I only need to get it to the bottom of my data

any help would be much appreciated

 

[VoG]

Try

Sub Test2()
Dim LR As Long
LR = Cells.Find(What:="*", SearchDirection:=xlPrevious, SearchOrder:=xlByRows).Row
Range("V2").AutoFill Destination:=Range("V2:V" & LR)
End Sub

 

[waxb18]

Thanks VoG...
Your definately on the xmas card list :D