checkbox combobox userform vba

[rjmdc]

hi
i have a userform that i am trying to make even easier
i would like that if opt is selected and checkbox is true the populate my actions combobox
see below in red what i am trying to do

Private Sub CmdEnter_Click()

    Worksheets("Log").Select
        Range("A4").Select
        
    If ActiveCell.Value = "" Then
       ActiveCell.Select
    Else
       Selection.End(xlDown).Offset(1, 0).Select
     End If
     
     If Me.CboParticipants.Value = "" Then
        Me.lblParticipantsName.ForeColor = vbRed
        Me.CboParticipants.SetFocus
     Exit Sub
     End If
     
     If Me.CboActions.Value = "" Then
        Me.lblActionProvided.ForeColor = vbRed
        Me.CboActions.SetFocus
     Exit Sub
     End If
      
        ActiveCell.Value = Me.CboParticipants
        ActiveCell.Offset(0, 1).Value = Me.txtDateToday
        ActiveCell.Offset(0, 2).Value = Me.CboActions
     If Me.optBudget.Value = True Then
        ActiveCell.Offset(0, 3).Value = "Budget"
     End If
     If Me.UploadedBudget = True Then
       ActiveCell.Offset(0, 4).Value = ChrW(&H2713)
also fill actions combo with "Budget Uploaded" this way the user doesnt have to also select dropdown of action provided
     End If
     If Me.optDDP1.Value = True Then
        ActiveCell.Offset(0, 5).Value = "DDP1"
     End If
     If Me.Approved = True Then
        ActiveCell.Offset(0, 6).Value = ChrW(&H2713)
    End If
         Call Clear_Click
         Me.lblActionProvided.ForeColor = vbBlack
         Me.lblParticipantsName.ForeColor = vbBlack
         
         Call cmdClose_Click
   End Sub