Userform - Kontrollkästchen

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
UserForm CheckBox Label
Bild

Betrifft: Userform - Kontrollkästchen von: Benjamin
Geschrieben am: 13.03.2005 10:18:40

Hallo,
ich habe ein Userform erstellt und möchte nun folgendes einbauen:

In der Tabelle sind verschiedene Formularfelder (auch Kontrollkästchen)
eingebaut. Nun möchte ich, dass wenn im Userform das entsprechende Kontroll-
kästchen angeklickt wird das entsprechende Gegenstück in der Tabelle mit
einem Kreuz versehen wird und auf dem Ausdruck dann auch als gekennzeichtenes
Kontrollfeld erscheint.

Ich hoffe Ihr blickt durch die Beschreibung durch. Wie kann ich dieses anstellen?

Im Voraus besten Dank.
Benjamin

Bild


Betrifft: AW: Userform - Kontrollkästchen von: Hajo_Zi
Geschrieben am: 13.03.2005 10:26:11

Hallo Benjamin,

Du hast das Beispiel schon erstellt, warum müssen die anderen das auch machen?
In diesem Forum kann man Dateien hochladen.


Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
Betriebssystem XP Home SP2 und Excel Version 2003 SP1.




Bild


Betrifft: AW: Userform - Kontrollkästchen von: Benjamnin
Geschrieben am: 13.03.2005 10:36:14

Aus Datenschutzgründen kann ich die Datei nicht zur Verfügung stellen.


Bild


Betrifft: AW: Userform - Kontrollkästchen von: Thorsten
Geschrieben am: 13.03.2005 10:39:57

Hallo Benjamin,

in Tabelle1 erstellst Du eine Checkbox und ein Label und benennst sie meinetwegen mit chkUnterschrift und lblUnterschrift.

In Deiner Userform erstellst Du ebenfalls eine Checkbox mit dem Namen chkUnterschrift.

In´s Change-Ereignis der Userform-Checkbox schreibst Du:



      
Private Sub chkUnterschrift_Change()
If chkUnterschrift.Value = True Then
Tabelle1.chkUnterschrift.Value = 
True
Tabelle1.Label1.Caption = "X"
ElseIf chkUnterschrift.Value = False Then
Tabelle1.chkUnterschrift.Value = 
False
Tabelle1.Label1.Caption = ""
End If
End Sub 


     Code eingefügt mit Syntaxhighlighter 3.0


Ich hoffe das hilft Dir weiter.

Gruß Thorsten


Bild


Betrifft: AW: Userform - Kontrollkästchen von: ransi
Geschrieben am: 13.03.2005 10:58:52

hallo benjamin

ganz ohne schnörkel:

Private Sub CheckBox1_Click()
Sheets("tabelle1").CheckBox1.Value = UserForm1.CheckBox1.Value
End Sub


ransi


 Bild

Beiträge aus den Excel-Beispielen zum Thema "Userform - Kontrollkästchen"