G
Guest
Hi
I often use autofill in the last column of data. Now I'm trying to Autofill
column A, and the code I use just autofills to the end of the spreadsheet. I
suspect this is because I'm trying to autofill when the data is to the right
of my column rather than the left. I've pasted the two bits of code that do
the same thing and normally work for me below.
Can someone advise what I need to change to make this work?
Dim LastRow As Long
With Worksheets("CURRENT WEEK")
LastRow = .Cells(Rows.Count, "A").End(xlUp).Row
Range("T4").AutoFill Destination:=.Range("T4:T" & LastRow),
Type:=xlFillDefault
End With
Range("T2").Select
Selection.AutoFill Destination:=Range("T2:T" &
ActiveSheet.UsedRange.Rows.Count)
Thanks in advance for any suggestions.
I often use autofill in the last column of data. Now I'm trying to Autofill
column A, and the code I use just autofills to the end of the spreadsheet. I
suspect this is because I'm trying to autofill when the data is to the right
of my column rather than the left. I've pasted the two bits of code that do
the same thing and normally work for me below.
Can someone advise what I need to change to make this work?
Dim LastRow As Long
With Worksheets("CURRENT WEEK")
LastRow = .Cells(Rows.Count, "A").End(xlUp).Row
Range("T4").AutoFill Destination:=.Range("T4:T" & LastRow),
Type:=xlFillDefault
End With
Range("T2").Select
Selection.AutoFill Destination:=Range("T2:T" &
ActiveSheet.UsedRange.Rows.Count)
Thanks in advance for any suggestions.