hi
I try making the rousource for specific comboboxes (cob1,cob4,cob7) should populate from column A for each comboboxes individually . so far it gives error could not fined the specified object in this line
Me.Controls("cbo" & varName).AddItem Range("A" & i)
Const cstrNames As String = "cbo1,cbo4,cbo7"
Dim varName As Variant
Private Sub UserForm_Initialize()
For Each varName In Split(cstrNames, ",")
For i = 2 To 200
If WorksheetFunction.CountIf(Range("A2:A" & i), Range("A" & i)) = 1 Then
Me.Controls("cbo" & varName).AddItem Range("A" & i)
End If
Next i
Next varName
End Sub
any suggestion to fix it,please?