Autofill in VBA question
one way:
Sub test()
Dim lRow As Long
lRow = ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastC ell).Row
Range("B4:B" & lRow).FillDown
End Sub
--
Hope that helps.
Vergel Adriano
"CarlosAntenna" wrote:
I am not a VBA programmer by any stretch of the imagination. I am here to
ask for help with a macro that I _recorded_.
Part of what my macro does is:
Insert a column in a sheet of data
Type a formula into the top cell of the new column
Copy the formula down the column for as far as there is data
I did this last step by double clicking the fill handle and this is the code
that is generated
Range("B4").Select
Selection.AutoFill Destination:=Range("B4:B450")
Range("B4:B450").Select
That's OK this time, but what about when there is more or less lines of
data.
How can this be changed to accomplish what I am looking for?
Thanks,
Carlos
|