The code below works to copy the formulas down based on the number of rows on the Items sheet. But, the Data sheet has 9 rows of header data so I need to add that amount of rows to whatever the count is from the Items sheet. Any help would be appreciated.
Sub CopyDataFormulasDown()
'
' CopyDataFormulasDown Macro
'
' Keyboard Shortcut: Ctrl+Shift+D
'
Range("A2:C2").AutoFill Destination:=Range("A2:C" & Worksheets("Items").Cells(Rows.Count, "A").End(xlUp).Row)
End Sub
Bookmarks