Macro Add row & add values in 2 different textbox

This adds the values to the next empty row in columns D and F when you click the command button. Is that what you want?

Private Sub CommandButton1_Click()
    With Cells.Find("*", , , , xlByRows, xlPrevious)
        Range("D" & .row).Value = TextBox2.Value
        Range("F" & .row).Value = TextBox3.Value
    End With
    Unload Me
End Sub