Creating a User Form with variable number of Controls buttons

You may create a userform with lets say 10 checkboxes and assign the code below to the userform. You have to verify the item indices of the checkboxes (under properties listed as TabIndex). The code as it is assumes index 0 to 9 for the 10 checkboxes.

Private Sub UserForm_Initialize()

Dim i As Long

For i = 1 To 10
If Cells(i, 1) = "" Then
    UserForm1.Controls.Item(i - 1).Visible = False
Else
    UserForm1.Controls.Item(i - 1).Visible = True
    UserForm1.Controls.Item(i - 1).Caption = Cells(i, 1).Value
End If
Next
End Sub