Excel UserForm Data Entry (VBA) #5 - ListBox

Learn how to create a simple userform in Excel VBA.
This video shows how to add ListBox Control.
The code used in this video:
Private Sub btnCancel_Click()
Unload Me
End Sub

Private Sub btnOK_Click()

Dim ws As Worksheet
Set ws = Worksheets("Customers")

Dim newRow As Long
newRow = Application.WorksheetFunction.CountA(ws.Range("A:A")) + 1

If obMale.Value = True Then
ws.Cells(newRow, 4).Value = "Male"
Else
ws.Cells(newRow, 4).Value = "Female"
End If

ws.Cells(newRow, 5).Value = "Yes"
Else
ws.Cells(newRow, 5).Value = "No"
End If

ws.Cells(newRow, 6).Value = "Yes"
Else
ws.Cells(newRow, 6).Value = "No"
End If

End If
Next i

End Sub

Private Sub UserForm_Initialize()

With cbCountries
.AddItem "Canada"
.AddItem "New Zealand"
End With
.AddItem "Monday"
.AddItem "Tuesday"
.AddItem "Wednesday"
End With

End Sub

[josephevangelista]

Hi I really learn a lot with your videos, however I have a doubt... Why do you write ME in most of items... ?? Sorry by the question I am pretty new in this all.