Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 21:09:11
4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren
18.04.2024 20:45:35
Worksheet_Activate für alle Sheets
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
18.04.2024 18:04:29
Formel fehler Wert#
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
380to384
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
380to384
380to384
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Kontrollkästchen / Alex.K

Kontrollkästchen / Alex.K
17.02.2004 14:48:24
Jacob
Hallo Alex,
hast jemals mit Kontrollkästchen gearbeitet ?. Ich habe gerade versucht aber ich habe keine Ahnung wie es damit gehen soll. Folgendes Problem :
Das erste Kontrollkästchen soll automatisch den Wert True erhalten beim Start der Datei. Das Kontrollkästchen soll abhängig von der Auswahl des Anwenders eine bestehende Routine erweitern. Kannst Du mir vielleicht dabei helfen. Danke
Jacob

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Kontrollkästchen / Alex.K
17.02.2004 15:15:22
Alex K.
Hallo Jakob,
ich gehe mal davon aus, dass du mit Kontrollkästchen aus der Formular-Symbolleiste in Excel meinst.
Also, nach Anlage des Kästchen musst du ja ein Makro zuweisen.
Deshalb vo Anlage folgenden MakroCode in ein Modul kopieren:

Public Sub KontrollClick()
'Wert 1 in Value, wenn Kontrollkästchen aktiviert
'Name des Kästchen entsprechend den Namen deines Kästchen anpassen
If ActiveSheet.Shapes("Kontrollkästchen 1").ControlFormat.Value = 1 Then
'dein Code, wenn Kontrollkästchen aktiviert wird
Else
'dein Code, wenn Kästchen deaktiviert wird
End If
End Sub

Im VBA-Editor in "DieseArbeitsmappe" folgenden Code kopieren:

Private Sub Workbook_Open()
ActiveSheet.Shapes("Kontrollkästchen 1").ControlFormat.Value = 1
'wenn nötig, kannst du dein Makro aufrufen, dass bei Aktivierung des
'Kontrollkästchen aktiv wird
KontrollClick
End Sub

Damit wird automatisch beim Öffnen der Datei das Kontrollkästchen aktiviert.
Anzeige
AW: Kontrollkästchen / Alex.K
17.02.2004 15:18:18
Jacob
Hallo Alex,
Danke und ich werde es gleich ausprobieren aber ich gehe davon aus (wie immer) dass es funktioniert
Viele Grüße
JAcob

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige