Hi

Try something like this.

Private Sub CommandButton2_Click():

Dim LastRow As Range
Dim strVal As String
  For i = 1 To 20
    If UserForm1.Controls("combobox" & i).Value = "" Then
      MsgBox "Please fill in all options"
      Exit Sub
    End If
  Next i
I've just put in the start of the module so you can see its position.

rylo