the formula needs to copy the range (A5:DG5) but doesnt do that, just show me random numbers
Sub paste()
' paste2 Macro
Dim lastRow As Long
' this finds the number of the last row
Rows(7) = Cells(Rows.Count, 5).End(xlUp).Row
Range("A5:DG5").Copy
Cells(lastRow + 1, 1).PasteSpecial paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Rows("7:7").Select
Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
End Sub
Sub paste()
' paste2 Macro
Dim lastRow As Long
' this finds the number of the last row
Rows(7) = Cells(Rows.Count, 5).End(xlUp).Row
Range("A5:DG5").Copy
Cells(lastRow + 1, 1).PasteSpecial paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Rows("7:7").Select
Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
End Sub