Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 21:26:15
mehrfache Texte finden
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
19.04.2024 17:05:40
Zählen von Zeilen, in denen in bestimmten Bereich Daten sind
19.04.2024 16:34:52
gemeinsamer Filter über drei Spalten
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
804to808
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
804to808
804to808
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Formular-Schaltfläche „Enabled=False“

Formular-Schaltfläche „Enabled=False“
02.10.2006 18:56:43
reiner
Hallo Leute,
auf einem Tabellenblatt habe ich aus der Symbolleiste „Formular“ mehrere Schaltflächen -die dem Command-Button ähnlich sehen- mit denen jeweils ein Makro gestartet wird, platziert.
Wie kann ich erreichen dass eine dieser Schaltflächen solange inaktiv bleibt bis eine andere Bedingung erfüllt ist?
Gibt es für „Formular-Schaltflächen“ ähnliche Möglichkeiten wie für „Steuerelement-Toolbox-Schaltflächen“, z.B. cmdCommandButton.enabled=false?
mfg
reiner

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Formular-Schaltfläche „Enabled=False“
02.10.2006 19:11:42
K.Rola
Hallo,
das geht, nur ist es nicht erkennbar. Im Beispiel hab ich die Farbe der Caption
geändert, rot bedeutet gesperrt:

Sub en_disable()
Dim b As Object
Set b = ActiveSheet.Buttons("Button 1")
If b.Enabled Then
b.Enabled = False
b.Font.Color = 255
Else
b.Enabled = True
b.Font.Color = 0
End If
End Sub

Gruß K.Rola
AW: Formular-Schaltfläche „Enabled=False“
03.10.2006 00:16:41
reiner
Hallo K.Rola,
Klappt wunderbar; ich habe noch eine Zusatzfrage:
Kann ich der gesperrten Schaltfläche auch einen neuen Text zuweisen während der Dauer der Sperrung?
mfg
reiner
AW: Formular-Schaltfläche „Enabled=False“
03.10.2006 00:37:15
K.Rola
Hallo,

Sub en_disable()
Dim b As Object
Set b = ActiveSheet.Buttons("Button 1")
If b.Enabled Then
b.Enabled = False
b.Font.Color = 255
b.Caption = "Nix da!"
Else
b.Enabled = True
b.Font.Color = 0
b.Caption = "Du darfst..."
End If
End Sub

Gruß K.Rola
Anzeige
Danke
03.10.2006 10:57:39
reiner
Hallo K.Rola,
z.Zt. keine weiteren Fragen,
schönen Feiertag noch
mfg
reiner

Links zu Excel-Dialogen

CommandButton

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige