Hello,
How possible is it to have a dynamic autofill?
[vba]
Selection.AutoFill Destination:=Range("k1:K70")
[/vba]
After I do the first autofill, I would then be filling 71 to 120, then 121 to 160 etc. ?
Hello,
How possible is it to have a dynamic autofill?
[vba]
Selection.AutoFill Destination:=Range("k1:K70")
[/vba]
After I do the first autofill, I would then be filling 71 to 120, then 121 to 160 etc. ?
Autofill must include the cell to fill from
[vba]
Range("K1").AutoFill Destination:=Range("k1:K70")[/vba]
[vba]Originally Posted by xld
Range("K1")
[/vba]
I have that part as dynamic already
However, ("k1:K70") , is there a way to say something like ("activecell:k70")?
[vba]
Range(Activecell,Cells(70,Activecell.Row)).Autofill
[/vba]
Range(Activecell,Cells(70,Activecell.Row)).Autofill
The .Autofill comes up as argument not optional.
[VBA]ActiveCell.AutoFill Range(ActiveCell, Cells(70, ActiveCell.Column))[/VBA]
MVP (Excel 2008-2010)
Post a workbook with sample data and layout if you want a quicker solution.
To help indent your macros try Smart Indent
Please remember to mark threads 'Solved'
Ok , great.
[vba]
ActiveCell.AutoFill Range(ActiveCell, Cells(70, ActiveCell.Column)) [/vba]
this worked out great for filling from the active cell. How possible is to have the 70 part , dynamically fill to the end of the column to the left of it instead of just 70?
[VBA]ActiveCell.AutoFill Range(ActiveCell, Cells(Rows.Count, _
ActiveCell.Column - 1).End(xlUp).Offset(, 1))
[/VBA]
Of course, if the data in the adjacent column is continous, you just need to double click the Fill button of the active cell.
MVP (Excel 2008-2010)
Post a workbook with sample data and layout if you want a quicker solution.
To help indent your macros try Smart Indent
Please remember to mark threads 'Solved'
I answered the question, you were supposed to combine it with my previous reply.
Thank-you. I was able to join the feed with the additional columns. Solved.
Posting Permissions
Reply With Quote
