I have tried multiple types of code, viewed countless hours of Youtube clips, and other forums, and am now at wits end!

I am trying to create a user form that will populate 13 fields (Columns) of data when the submit button is clicked. I then want the next time it is clicked to add the new data to the next row down.
I want it to start in column B (Column A is prefilled with a serial number), and then start on Row 4 Downwards.

I have included a number of combo boxes (which work), and a series of data validation (which work).

No matter what i have tried i always get an error in some form.

The Code is as follows:

Dim sh As Worksheet
Set sh = ThisWorkbook.Worksheets("Test List")
Dim n As Long
n = sh.Range("B" & Applications.Rows.Count).End(x1Up).Row

sh.Range("B" & n + 1).Value = Me.txtTN.Value
sh.Range("C" & n + 1).Value = Me.txtTO.Value
sh.Range("D" & n + 1).Value = Me.txtPPOC.Value
sh.Range("E" & n + 1).Value = Me.txtTPOC.Value
sh.Range("F" & n + 1).Value = Me.txtAC.Value
sh.Range("G" & n + 1).Value = Me.txtSD.Value
sh.Range("H" & n + 1).Value = Me.txtED.Value
sh.Range("I" & n + 1).Value = Me.cboF1.Value
sh.Range("J" & n + 1).Value = Me.cboF2.Value
sh.Range("K" & n + 1).Value = Me.cboF3.Value
sh.Range("L" & n + 1).Value = Me.cboF4.Value
sh.Range("M" & n + 1).Value = Me.txtAP.Value
sh.Range("N" & n + 1).Value = Me.txtPJPOC.Value
sh.Range("O" & n + 1).Value = "Proposed"

End Sub


2019_08_29_08_56_27_Microsoft_Visual_Basic_for_Applications_Test_Facility_Coordination_Manager.png

Any Help with this would be greatly appreciated!!!