I keep getting a subscript out of range error. I am extremely new to VBA and have double checked that my combobox is indeed named TypeLabel and my Userform is named LoadType.

Right now, I am simply trying to display a userform with a list of values from a defined range ("TestList") in the combobox. Any insight on why my code is erroring would be greatly appreciated!

Private Sub UserForm_Initialize()

Dim loadLabel As Range
Dim ws As Worksheet

Set ws = Worksheets("TestList")


For Each loadLabel In ws.Range("TestList")
With Me.TypeLabel
.AddItem loadLabel.Value
End With
Next loadLabel

End Sub

Sub StartLoad()

LoadType.Show

End Sub


Thank you in advance!!!