VBA Userform Ckeckbox

  • Excel

Es gibt 1 Antwort in diesem Thema. Der letzte Beitrag () ist von MichaHo.

    VBA Userform Ckeckbox

    Hallo,

    Ich versuche mich gerade an meinem ersten UserfForm und wollte dort mit checkboxen Arbeiten. Da es relativ viele Boxen sind, würde ich es gerne ermöglichen, alle auf einmal anzuwählen. Ich habe auch einen Code mit dem das geht, allerdings ist er sehr lang.
    Hat jemend eine Idee , wie ich das eventuell verkürzen könnte ?

    Die Checkboxen liegen auf einer Multipage Seite, diese hier z.b. auf der mit index 1. Insegesammt sind es 2 Multipages mit jeweils 20 CeckB, hab den code hier gekürtzt.


    Quellcode

    1. Private Sub CheckBoxAlles1_Click()
    3. If CheckBoxAlles1 = True Then
    5. CheckBoxAl = True
    6. CheckBoxFe = True
    7. CheckBoxCu = True
    8. CheckBoxMg = True
    10. Else
    12. CheckBoxAl = False
    13. CheckBoxFe = False
    14. CheckBoxCu = False
    15. CheckBoxMg = False
    17. End If
    19. End Sub


    Grüße

Facebook
Telefonspende