Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
820to824
820to824
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Makro zum Wechsel der Farbe des Command Buttons

Forumthread: Makro zum Wechsel der Farbe des Command Buttons

Makro zum Wechsel der Farbe des Command Buttons
27.11.2006 15:03:12
Tulio
Hallo,
ich hätte gerne, dass die Farbe des Command Buttons sich nach dem anklicken verändert. Wenn möchglich noch in Abhängigkeit eines anderen Zellwertes. Geht das?
Grüsse
Tulio Acevedo
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Makro zum Wechsel der Farbe des Command Button
27.11.2006 16:29:54
Tulio
Hallo hansueli und Rudi,
vielen Dank für eure Hilfe.
@ hasueli leider konnte ich damit nichts anfangen
@ Rudi ja, das kommt dem was ich suche schon sehr nah, jetzt müsste es nur noch in Abhängigkeit vom Inhalt in Zelle A1 sein. Nur wenn der Wert kleiner als 60 ist.
Und gibt´s eine Liste der RGB Zahlen. Ich benötige die Werte für pastel-rosa und pastel-grün.
Also nochmals vielen Dank!
Tulio
Anzeige
AW: Makro zum Wechsel der Farbe des Command Button
27.11.2006 16:37:08
EtoPHG
Hallo Tulio,

Private Sub CommandButton1_Click()
With CommandButton1
If .BackColor = 12632319 Then
.BackColor = 12648384
Else
.BackColor = 12632319
End If
End With
End Sub

Gruss Hansueli
"Alles Wissen, die Gesamtheit aller Fragen und alle Antworten, sind im Hund enthalten [ähh begraben, Anm.d.Verf.]." Franz Kafka
Anzeige
AW: Makro zum Wechsel der Farbe des Command Button
28.11.2006 12:57:42
Tulio
Danke!Super!
AW: Makro zum Wechsel der Farbe des Command Buttons
27.11.2006 15:31:52
Rudi
Hallo,
klar geht das.

Private Sub CommandButton1_Click()
With CommandButton1
If .BackColor = RGB(255, 0, 0) Then
.BackColor = RGB(180, 180, 180)
Else
.BackColor = RGB(255, 0, 0)
End If
End With
End Sub
Gruß
Rudi
Eine Kuh macht Muh, viele Kühe machen Mühe
Anzeige
;

Forumthreads zu verwandten Themen

aufbau vieler command buttons, verzögerung?
marc

guten abend zusammen
ich habe eine etwas "unschöne" erscheinung in meiner anwendung:
ich wechse von den ca. 20 arbeitsblättern jeweils mittels folgendem code auf das hauptarbeitsblatt:
Public Sub Hauptmenü() Application.ScreenUpdating = False Worksheets("tabelle1").Activate Range(...
09.10.2008 19:10:08
Thread-ID: 1015438
7 Beiträge
Command Button schützen vor VBA
Hüseyin

Hallo zusammen,
habe eine kurze Frage und hoffe ihr könnt mir weiterhelfen,
ich habe ein Exceldokument mit Commandbuttons drin. Wenn ich allerdings über VBA eine "Sortierung" oder "Komprimierung" über das Tabellenblatt laufen lasse, werden meine Buttons kleiner bzw. sehen gequetscht aus...
28.10.2008 11:21:33
Thread-ID: 1019856
3 Beiträge
Command Button & Variablenübergabe
Jacques

Hallo,
ich erzeuge aus jeder beschriebenen Zeile in einer Mappe einen Command Button. wird dieser gedrückt soll eine Userform aufgehen, und in derenn Feldern die Einträge aus der Zeile stehen, die zum Erzeugen des Buttons führte. Beim Erzeugen der CommandButton stelle ich mir vor, dass ich...
06.11.2008 15:31:39
Thread-ID: 1022322
2 Beiträge
Auswahl von Command Buttons
Command

Hallo,
Ich möchte einen CommandButton auf einem Acces Form aus Excel heraus mit VBA aktivieren. Konkret weiß ich nicht, wie man einen CommandButton ansteuert und diesen per Makro klickt.
Vielen Dank für Eure Hilfe!
Gruß
Lars
24.11.2008 18:49:40
Thread-ID: 1027439
3 Beiträge
Command Button
eric1

Hallo zusammen und einen schönen Abend,
ich möchte die Ansicht der UserForm verschönern, die CommandButton werden wie folgt erstellt :
....
Set ctlOK1 = Controls("frm2").Controls.Add("forms.commandbutton.1", _
"cmdOK1", True)
With ctlOK1
.Left = 320
.Top = 40
.Wi...
17.02.2009 19:53:00
Thread-ID: 1051607
3 Beiträge
Command Button wie Schaltfläche benützen
Andre

Hi Leute,
ich habe keine Ahnung, warum diese zwei Makro codes bei einer Schaltfläche funktionieren, aber wenn ich es einem Command Button zuweise nicht.
Bei Range flippt er jedes mal aus und macht nicht weiter. Kann man einen Command Button mit diesen Codes füttern?
Sub back() Ac...
18.02.2009 18:03:00
Thread-ID: 1051885
6 Beiträge
Werte löschen mit Command Button
Thomas

Hi Profis,
trotz Google Recherche komm ich nicht so richtig weiter. Mist.
Mein Problem besteht darin, das ich hier einen Code aus diesem Forum nach Anpassung an meine Bedürfnisse benutze, welcher Leere Zellen mit einer Ziffer ausfüllt. Klappt soweit sehr gut.
Nun aber macht dieser...
04.03.2009 17:53:38
Thread-ID: 1056535
5 Beiträge
Command Button
Frank

Hei,
muss noch mal stören!! :-)
Kann mir jemand veraten wie ich meine Buttons in meiner Exelmappe wieder zum Leben erwecke.
In Tabelle 1 und 2 sind sie anklickbar in Tabelle 3 und 4 seit 2h nicht mehr. Gehe ich auf Eigenschaften wird mir da nur die Hälfte der Eigenschaftsvariablen a...
06.06.2009 15:28:08
Thread-ID: 1079604
7 Beiträge
Command Button verruscht
merlin

Hallo,
wer kann mir bei diesem Problem helfen?
Eine Tabelle von A bis J und von 1 bis ca. 2000.In diese Tabelle sortiert ich alle Spalten mit dem AutoFilter. Das klappt sehr gut, jetzt möchte ich den gefilterten Bereich über einen Command Button ausdrucken. Aber der Button verruscht manch...
29.04.2002 12:52:26
Thread-ID: 117135
3 Beiträge
Command Button
Ralf

Hallo Excel - Experten,
ich habe eine Excel - Datei mit 11 Tabellen. In
jeder Tabelle habe ich einen CommandButton ( mit VBA Code ).
Jeder CommandButton für sich funktioniert ganz
super.
Nun zu meinem Problem: ich möchte gerne aus der
Tabelle 1 heraus alle 11 gleichzei...
30.08.2010 10:38:58
Thread-ID: 1174739
9 Beiträge
Command Buttons
Peter

Hallo zusammen,
ich habe eine Userform. Es soll eine Abfrage über 30 ToggleButton (TB) erfolgen.
(Name= TB1, TB2,...; Caption=1, 2, ...)
Wird ein TB gedrückt (Value=true) soll sich die Hintergrundfarbe ändern und der Wert (Caption) in Spalte A schreiben. Und umgekehrt (Value=false)<...
21.02.2011 22:40:49
Thread-ID: 1202211
3 Beiträge
Anzeige
Command Button als Grafik ausblenden
EarnyToLearny

Hallo zusammen,
um eine Schaltfläche auszublenden könnte man das doch verwenden?
If ActiveSheet.Cells(17, 3) = 1 Then CommandButton?.Visible = True
Else
CommandButton?.Visible = False
End If

Jedoch verwende ich selbst erstellte Grafik-Buttons in denen dann das M...
11.06.2011 20:15:48
Thread-ID: 1218168
7 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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