Seite 1 von 1
Ausgegraute Schaltfläche ( Ein / Aus ) wenn Wert
Verfasst: Mo, 17.04.2017 08:48
von tsw68
Hallo,
versuche jrtzt schon 3 Tage mein Problem zu Lösen Gegoogelt und nichts gefunden zum Thema.
Vieleicht könnt ihr mir Helfen.
Ich möchte meine Schaltfläche / Button Ausgrauen - Aktivieren/Deaktivieren wenn Wert in Zelle BA15 = 12 ist
so das mann in erst anklicken kann wenn Wert < 12 ist.
jetzt schon vielen Dank !
MFG tsw68
Re: Ausgegraute Schaltfläche ( Ein / Aus ) wenn Wert
Verfasst: Mo, 17.04.2017 10:12
von Stephan
z.B. diese Makro tut das:
Code: Alles auswählen
sub Main
tc0 = ThisComponent.Sheets(0)
x = tc0.Drawpage.Forms.getByName("Formular").getByName("Schaltfläche 1")
If tc0.getCellRangeByName("BA15").Value = 12 Then
x.enabled = False
Else
x.enabled = True
End If
end Sub
man kann es dazu dem Tabellenereignis "Inhalt geändert" zuordnen.
Gruß
Stephan
Re: Ausgegraute Schaltfläche ( Ein / Aus ) wenn Wert
Verfasst: Mo, 17.04.2017 10:20
von tsw68
Hi.
das Makro habe ich zugewisen es kommt
Basic Laufzeitfehler
Exception aufgetreten
in:
x = tc0.Drawpage.Forms.getByName("Formular").getByName("Schaltfläche 1")
Re: Ausgegraute Schaltfläche ( Ein / Aus ) wenn Wert
Verfasst: Mo, 17.04.2017 10:50
von tsw68
genau so soll es sein.
Muss Der Butten vieleicht auf Tabelle1 sein?
Re: Ausgegraute Schaltfläche ( Ein / Aus ) wenn Wert
Verfasst: Mo, 17.04.2017 11:14
von tsw68
Sheets(0) ist Tabelle 1, Sheets(1) ist Tabelle 2
genau das wahr es
Ich muste Sheets(0) ---- in Sheeets(5) ändern für die 6.Tabelle
Alles Super gut.
Für mich [gelöst]
1000. Dank
MFG tsw68
Re: Ausgegraute Schaltfläche ( Ein / Aus ) wenn Wert
Verfasst: Mo, 17.04.2017 11:14
von Stephan
genau so soll es sein.
dann stimmt aber die Aufgabenstellung nicht denn dort ist die Rede von:
"Aktivieren/Deaktivieren wenn Wert in Zelle BA15 = 12 ist"
So hatte ich das auch in meinem geposteten Makrocode umgesetzt.
Gruß
Stephan
Re: Ausgegraute Schaltfläche ( Ein / Aus ) wenn Wert
Verfasst: Mo, 17.04.2017 12:19
von tsw68
ich noch mal!
In meinem Fall gibt es nur BA12 für Deactiviert und alles was dadrunter ist Aktiviert
über 12 gibt es nicht.
Re: Ausgegraute Schaltfläche ( Ein / Aus ) wenn Wert
Verfasst: Di, 18.04.2017 08:58
von Stephan
HeritzP hat geschrieben: Mo, 17.04.2017 11:37
Hallo,
es steht halt beides dort. 50/50 Chance.
Aktivieren/Deaktivieren wenn Wert in Zelle BA15 = 12 ist
so das mann in erst anklicken kann wenn Wert < 12 ist.
Gruß HeritzP
Aah ja, stimmt.
Gruß
Stephan