Copy Formula down x Number of rows
 

Hello,

I would appreciate some help with the following.

I am looking for some VBA code that will copy the formula
in a selected cell and then paste the formula down x number
of rows.

Thanks,

Steve

Copy Formula down x Number of rows
 

Try this code where I am copying the contents of B4 on Sheet1 down 10 more
cells below it.

NumberOfCopies = 10
With Worksheets("Sheet1").Range("B4")
.Copy .Offset(1).Resize(NumberOfCopies, 1)
End With

Rick


wrote in message
...
Hello,

I would appreciate some help with the following.

I am looking for some VBA code that will copy the formula
in a selected cell and then paste the formula down x number
of rows.

Thanks,

Steve