title image


Smiley Change Event nicht auslösen
Hallo!



Weis jemand von euch wie man das Change Event bei

Formularobjekten ausschalten kann?



Ich habe 3 ToggleButton, von denen immer nur einer

(aber auch nicht keiner) Ausgewählt sein soll.



Ich habe es mit folgendem Script probiert, aber das funktioniert bei mir

nicht, es laufen immer alle Change Ereignisse. und es ist dann immer Button 3 ausgewählt.







      

Private Sub ToggleButton1_Change()

    

    Application.EnableEvents = False

    ToggleButton1.Value = True

    ToggleButton2.Value = False

    ToggleButton3.Value = False

    Application.EnableEvents = True

    

End Sub



Private Sub ToggleButton2_Change()

    

    Application.EnableEvents = False

    ToggleButton1.Value = False

    ToggleButton2.Value = True

    ToggleButton3.Value = False

    Application.EnableEvents = True

    

End Sub



Private Sub ToggleButton3_Change()

    

    Application.EnableEvents = False

    ToggleButton1.Value = False

    ToggleButton2.Value = False

    ToggleButton3.Value = True

    Application.EnableEvents = True

    

End Sub 



Code eingefügt mit Syntaxhighlighter 3.0









Mir wäre auch geholfen sollte jemand eine andere Idee haben wie man eine solche Auswahl gestalten könnte. Dazu muss ich aber leider gleich noch erwähnen, dass Optionbuttons oder ein Register(von einer Multipage) bereits aus optischen Gründen abgelehnt wurden.





Vielen Dank für Eure Hilfe



Schöne Grüße

Norbert



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: