Converting code to R1C1 format

  • Thread starter Thread starter Paul
  • Start date Start date
P

Paul

Hi-

is it possible to write this line of code in R1C1 format
instead of hardcoding the range? I want to be able to use
it multiple times without updating the cell reference
every time. Thanks!

Selection.AutoFill Destination:=Range("E19:AN19"),
Type:=xlFillDefault
 
How about:

With ActiveCell
.AutoFill Destination:=.Resize(1, 36), Type:=xlFillDefault
end with

But if you wanted to start in column E no matter where you were in that row:

With Cells(ActiveCell.Row, "E")
.AutoFill Destination:=.Resize(1, 36), Type:=xlFillDefault
End With
 
Back
Top