Compile error: Member already exists in an object module...Trying to create a form

Hello all,

I am trying to create a form to add new customers to a database for my homework assignment. I keep getting the compile error: member already exists in an object module from which this object module derives.

My codes are as follows:
Form:

Private Sub cmdOK()
    'Copy input values to sheet.
    Dim lRow As Long
    Dim ws As Worksheet
    Set ws = Worksheets("Customer Database")
    lRow = ws.Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).Row
    With ws
        .Cells(lRow, 1).Value = Me.Company_Name.Value
        .Cells(lRow, 2).Value = Me.Last_Name.Value
        .Cells(lRow, 3).Value = Me.First_Name.Value
        .Cells(lRow, 4).Value = Me.Address1.Value
        .Cells(lRow, 5).Value = Me.Address2.Value
        .Cells(lRow, 6).Value = Me.City.Value
        .Cells(lRow, 7).Value = Me.State.Value
        .Cells(lRow, 8).Value = Me.Zip_Code.Value
    End With
    
    'Clear input controls.
    Me.Company_Name.Value = ""
    Me.Last_Name.Value = ""
    Me.First_Name.Value = ""
    Me.Address1.Value = ""
    Me.Address2.Value = ""
    Me.City.Value = ""
    Me.State.Value = ""
    Me.Zip_Code.Value = ""
End Sub

Private Sub cmdCancel()
    'Close UserForm.
    Unload Me

End Sub

Private Sub UserForm_Click()

End Sub

And Module:

Sub Customer_Database()
'
' Customer_Database Macro
' Go to Customer Database Page
'

'
    Sheets("Customer Database").Select
    Range("Table1[Company Name]").Select
End Sub
Sub Vendor_Database()
'
' Vendor_Database Macro
' Go to Vendor Database
'

'
    Sheets("Vendor Database").Select
    Range("B3").Select
End Sub
Sub Main_Menu()
'
' Main_Menu Macro
' Return to Main Menu
'

'
    Sheets("Main Menu").Select
    Range("A1").Select
End Sub
Sub ShowCustomer()
    'Display Customer UserForm.
    ufrmCustomers.Show Modal
End Sub

What am I doing wrong?

Moderator's note: Please take the time to review our rules. There aren't many, and they are all important. Rule #3 requires code tags. I have added them for you this time because you are a new member. --6StringJazzer

Hello MonaP9,

Welcome to the Forum!

It would be easier to check your work for errors if you posted a copy of the workbook.

How To Post Your Workbook

1. At the bottom right of the Reply window, Click the button Go Advanced
2. At the top of the Your Message Window, in the first row of icons, Click the Paperclip icon.
3. Click the Add Files button at the top right in the dialog box. This displays the File Manager dialog.
4. Click the Select Files button at the bottom middle of the dialog.
5. In the new window Find the file you want to upload, select it, and Click Open.
6. You will now be back in the File Manager dialog. Click the bottom Middle button Upload File.
7. Wait until the file has completely uploaded before you exit the File Manager dialog.

When asking for help with a compile error always show the line of text that is highlighted when the error occurs.

Change this line of code.

Private Sub cmdCancel_Click()