ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Worksheet Functions (https://www.excelbanter.com/excel-worksheet-functions/)
-   -   VBA to autofill from relative location (https://www.excelbanter.com/excel-worksheet-functions/262868-vba-autofill-relative-location.html)

AlexJarvis

VBA to autofill from relative location
 
If I need to autofill column B from the last cell that has data in it to the
same row as the last cell of column A that has data in it, how do I set the
destination for the autofill correctly?



I have tried a lot of ways that seemed obvious and all of them return errors.


Here is where I am stuck:

Selection.AutoFill Destination:=Range(B[this number is the active cell, or
the one I just put a value in in column B]:B[this number should be the same
as the last cell that has a value in it in column A])



Jacob Skaria

VBA to autofill from relative location
 
Try

Dim lngRow As Long

lngRow = Cells(Rows.Count, "A").End(xlUp).Row
Selection.AutoFill Destination:=Range("B" & ActiveCell.Row & ":B" & lngRow)


--
Jacob (MVP - Excel)


"AlexJarvis" wrote:

If I need to autofill column B from the last cell that has data in it to the
same row as the last cell of column A that has data in it, how do I set the
destination for the autofill correctly?



I have tried a lot of ways that seemed obvious and all of them return errors.


Here is where I am stuck:

Selection.AutoFill Destination:=Range(B[this number is the active cell, or
the one I just put a value in in column B]:B[this number should be the same
as the last cell that has a value in it in column A])



AlexJarvis

VBA to autofill from relative location
 
Good deal, thank you!

I was forgetting to put a "&" in there...

-A

"Jacob Skaria" wrote:

Try

Dim lngRow As Long

lngRow = Cells(Rows.Count, "A").End(xlUp).Row
Selection.AutoFill Destination:=Range("B" & ActiveCell.Row & ":B" & lngRow)


--
Jacob (MVP - Excel)


"AlexJarvis" wrote:

If I need to autofill column B from the last cell that has data in it to the
same row as the last cell of column A that has data in it, how do I set the
destination for the autofill correctly?



I have tried a lot of ways that seemed obvious and all of them return errors.


Here is where I am stuck:

Selection.AutoFill Destination:=Range(B[this number is the active cell, or
the one I just put a value in in column B]:B[this number should be the same
as the last cell that has a value in it in column A])




All times are GMT +1. The time now is 06:39 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com