Auto Fill - Multiple Columns

[batchy]

Hi,

I have a VB code which auto fills column A down to the last row with data in, i would like to expand this to auto fill columns A:C

Sub test()
    Dim lastrow As Long
    
    lastrow = Worksheets("sheet1").Range("D8").End(xlDown).Row
    With Worksheets("Sheet1").Range("A2")
        .AutoFill Destination:=Range("A2:A" & lastrow&)
    End With
End Sub