
How to get data from form to paste into new sheet on next empty row
"Tracking" is the sheet where the form is on and the data is input "log" is the sheet where i would like all the data to paste but i would like for each paste to go to the next row. Here is my VBA Code: Sub Range_Copy() 'Copy data from tracking sheet to log sheet 'belt style Worksheets("Tracking").Range("C7").Copy Worksheets("Log").Range("B3").End(xlDown).Row + 1 'Batch # Worksheets("Tracking").Range("C9").Copy Worksheets("Log").Range("C3").End(xlDown).Row + 1 'OAG Spec 'Worksheets("Tracking").Range("K7").Copy Worksheets("Log").Range("D3") 'Tolerance 'Worksheets("Tracking").Range("O7").Copy Worksheets("Log").Range("E3") 'Date Worksheets("Tracking").Range("O9").Copy Worksheets("Log").Range("A3").End(xlDown).Row + 1 'Operator side measurments Worksheets("Tracking").Range("C12").Copy Worksheets("Log").Range("F3").End(xlDown).Row + 1 Worksheets("Tracking").Range("D12").Copy Worksheets("Log").Range("G3").End(xlDown).Row + 1 Worksheets("Tracking").Range("E12").Copy Worksheets("Log").Range("H3").End(xlDown).Row + 1 Worksheets("Tracking").Range("F12").Copy Worksheets("Log").Range("I3").End(xlDown).Row + 1 Worksheets("Tracking").Range("G12").Copy Worksheets("Log").Range("J3").End(xlDown).Row + 1 Worksheets("Tracking").Range("H12").Copy Worksheets("Log").Range("K3").End(xlDown).Row + 1 Worksheets("Tracking").Range("I12").Copy Worksheets("Log").Range("L3").End(xlDown).Row + 1 Worksheets("Tracking").Range("J12").Copy Worksheets("Log").Range("M3").End(xlDown).Row + 1 Worksheets("Tracking").Range("K12").Copy Worksheets("Log").Range("N3").End(xlDown).Row + 1 Worksheets("Tracking").Range("L12").Copy Worksheets("Log").Range("O3").End(xlDown).Row + 1 Worksheets("Tracking").Range("M12").Copy Worksheets("Log").Range("P3").End(xlDown).Row + 1 Worksheets("Tracking").Range("N12").Copy Worksheets("Log").Range("Q3").End(xlDown).Row + 1 Worksheets("Tracking").Range("O12").Copy Worksheets("Log").Range("R3").End(xlDown).Row + 1
Microsoft 365 and Office | Development | Other

Microsoft 365 and Office | Excel | For business | Windows
