Autofill Help

[tcnt9176]

I hope there is a quick alteration to this script below. This is generally the script I use whenever I need to autofill a column in a spreadsheet. How do I alter this in a case where the cell I want to autofill changes (dyanamic). Until now, it has always started in the 2nd row but this time it could change. I tried defining "FirstRow" by active cell without any luck. Thanks for your help.

    Range("O2").Select
    LastRow = Range("A65536").End(xlUp).Row
    Selection.AutoFill Destination:=Range("O2:O" & LastRow)

 

[Damon Ostrander]

Hi tcnt9176,

You can use the fact that the Range property can accept two arguments (defining the beginning and end of the range) combined with the Cells property, like this:

Selection.AutoFill Destination:=Range(Cells(FirstRow,"O"),Cells(LastRow,"O"))

Of course, the value of the FirstRow variable will have to have been previously assigned.

Keep Excelling.

Damon

 

[tcnt9176]

I got Run-time error '13': Type mismatch. Is that because I need to define FirstRow?How would I define First Row as ActiveCell?
I tried this but it stopped on the line you gave me.

    FirstRow = ActiveCell
    LastRow = Range("A65536").End(xlUp).Row
    Selection.AutoFill Destination:=Range(Cells(FirstRow, "O"), Cells(LastRow, "O"))

 

[Damon Ostrander]

Hi again tcnt9176,

FirstRow is an integer row number, while ActiveCell is a Range Object. To get the active cell's row you can do it like this:

FirstRow = ActiveCell.Row


Damon

 

[tcnt9176]

Perfect!! Thanks for your patience!!