copy down

[Guest]

I have a formula in cell Y8. I wan tot copy it down to the last row of the
table. The last row is the last filled cell in column B. I am using the
following and it doesn't work:

With ActiveCell ' CellY8
Range(.Offset(0, -19), .Offset(0, -10).End(xlDown)).Offset(0, 1).FillDown
End With


Any suggestions for a code?
Thanks

 

[Dick Kusleika]

vlad

With ActiveCell
.Resize(.Parent.Range("B8").End(xlDown).Row - 8 + 1).FillDown
End With