Führen Sie einen Makro durch Checkbox Eingang

Question

I Check-Boxes mit Beschriftung von Ländernamen haben und eine OK Taste auf User-form,

Benutzer MarkCheck-Boxes erforderlich wird, und klicken Sie OK das Formular abzuschicken.

Erwartetes Ergebnis: Für jede überprüfte Box ist eine Macro durchzuführen.

Wie mache ich die OK Schaltfläche, um Makro auf ausgewählten Ländern, die Check-Marked by User?

und

Ist der folgende Code korrekt mit der Situation umgehen? Oder gibt es einen anderen Weg?

If ActiveDocument.CeemeaFinallist.EasternEurope("CheckBox1").CheckBox.Value = True Then 
Application.Run MacroName:="Normal.NewMacros.CEEMEA2" 
Else 
End If 

Wie kann ich Select allCheck-Boxes einmal an?

Answer 1

Versuchen über die Kontrollen laufen und das Makro befeuert werden, sofern das Kontrollkästchen auf True gesetzt ist:

Private Sub CommandButton1_Click() 
Dim ctl As Control 
Dim j As Long 
For Each ctl In Me.Controls 
    If TypeOf ctl Is MSForms.CheckBox Then 
     If Me.Controls(ctl.Name).Value = True Then 
      ' Fire macro with ctl.Caption to identify the country 
     End If 
    End If 
Next  
End Sub