UserForm has errors -need help

txguy · Nov 9, 2021

I'm new to both userForm creation and VBA coding. I did a userForm but am seeing errors in it. Not sure how to correct them. Any help would be appreciated greatly since I need to get this doen soonest. The Excel File is attached. Just need it to work. Thank you.

Logit · Nov 10, 2021

Here is a sample database attached. Study the code and it can be applied to your project with some simple adjustments.

Code:

Option ExplicitPrivate Sub btnCancel_Click()
    Unload Me
End Sub


Private Sub btnOK_Click()
    Dim ws As Worksheet
    Set ws = ActiveSheet
    Dim newRow As Long
    
    newRow = Application.WorksheetFunction.CountA(ws.Range("A:A")) + 1
    
    'The next two lines can be expanded as many times as needed for all the entry fields in your project
    
    ws.Cells(newRow, 1).Value = Me.txtFirstName.Value
    ws.Cells(newRow, 2).Value = Me.txtSurname.Value
    
End Sub
Sub CommandButton1_Click()
    Selection.EntireRow.Delete
End Sub

UserForm has errors -need help

txguy

New member

Attachments

Logit

Member

Attachments