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

CommandButtons

Forumthread: CommandButtons

CommandButtons
11.08.2006 09:15:36
Oscar
Hallo zusammen , kann mir jemand erklären wie ich in einer Userform CommandButtons bei Betätigung eine andere Farbe gebe.
In hoffnungsvoller Erwartung Oscar
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: CommandButtons
11.08.2006 09:23:27
Hans
Hallo Oscar,
wie folgt:

Private Sub cmdOK_MouseDown( _
ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
cmdOK.BackColor = vbRed
End Sub



Private Sub cmdOK_MouseUp( _
ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
cmdOK.BackColor = -2147483633
End Sub

gruss hans
Anzeige
AW: CommandButtons
11.08.2006 09:52:27
Oscar
Hallo Hans, das klappt ja sehr sehr gut. Besten Dank für die schnelle Anwort und ein schönes Wochenende wünscht Oscar
AW: CommandButtons
11.08.2006 09:48:35
Bal
Hallo Oscar,
noch eınfacher gehts so:

Private Sub CommandButton1_Click()
CommandButton1.BackColor = &H8080FF    ' Farbe Rot
End Sub

mfg
Bal
Anzeige
AW: CommandButtons
11.08.2006 09:59:18
Oscar
Hallo Bal, einfacher geht’s wirklich nicht. Dir auch besten Dank und natürlich ein schönes Wochenende Gruß Oscar
;

Forumthreads zu verwandten Themen

Commandbuttons einfärben
Wolfgang

Hallo Excel Experten.
Stehe vor einem Problem bei dem ich nicht mehr weiterkommen.
Ich habe in einer Userform 42 CommandButton, die je nach Programmablauf verschieden eingefärbt werden sollen.
Es will mir aber nicht gelingen, diese einzeln in einer Schleife anzusprechen, den momenta...
15.10.2008 08:56:10
Thread-ID: 1016475
3 Beiträge
Allgemeiner code für mehrer Commandbuttons
Christoph

Hallo zusammen,
Wie kann ich für mehrere Commandbuttons, die alle in einer Frame sind, allgemein ansprechen?
Konkret:
Dieser Code funktioniert jetzt nur für die Buttons A und B und analog für die restlichen 28.
Ich möchte aber, dass dieser Code für Alle Buttons in dem Frame 'erw...
13.11.2008 07:59:00
Thread-ID: 1024024
7 Beiträge
per Makro CommandButtons mit individuellem Code
Gerry83

Hallo zusammen
Ein externes Programm führt mit unterschiedlichen Parametern 20736 Berechnungen durch, die Ergebnisse werden in jeweils eine *.txt Datei geschrieben. Zusätzlich erhalte ich ein Flag, ob die Berechnung erfolgreich war oder nicht.
Ein Makro soll mir nun 20736 CommandButtons...
23.11.2008 16:29:00
Thread-ID: 1027102
6 Beiträge
Alle Commandbuttons auf Enabled false
Tom

Hallo Nochmals
Habe eine aufwendige Datei mit einigen UF's erstellt.
Diese Datei nenne ich Masterdatei.xlw.
Um diese Datei nicht als Arbeitsdatei zu benutzen sollten alle Commandbuttons in der Userform Eingang auf Enabled false gesetzt werden ausser Commandbutton5.
Beim laden...
01.03.2009 22:02:20
Thread-ID: 1055369
11 Beiträge
Anzeige
If Abfrage Laufwerk für enabled Commandbuttons
Wolfgang

Hi
Kriege es nicht hin. Wollte abfragen, ob Laufwerk und Ordner gleich sind wie in Zelle C3 dann weiter sonst fast alle Commandbuttons ausblenden ausser Comm 16 und 9.
Bei ChDir erhalte ich einen Fehler. In Zelle A3 steht C:\Prodat
Private Sub UserForm_Initialize()
Dim objCon A...
14.03.2009 20:54:51
Thread-ID: 1060277
7 Beiträge
Anzeige
versch Makros dyn erzeugten Commandbuttons zuordne
C.

Hallo Leute,
folgendes mache ich:
For i = 1 to AnzahlButtons
Set tebo = Controls.Add("Forms.commandbutton.1")
next AnzahlButtons
Mit den Commandbuttons sollen Makros ausgeführt werden können, die sich leicht unterscheiden. Zur Unterscheidung würde eine Variable genügen, aber...
15.05.2009 18:53:49
Thread-ID: 1075570
6 Beiträge
UserForm CommandButtons schleifengesteuert
Andreas

Hallo Herber Fans,
ich bin gerade dabei, mein Wissen um UserForms zu vertiefen und bin auf ein Problem in der schleifengesteuerten Einrichtung von UserForms gestoßen. Die Suche im Forum und auf meiner Herber CD hat bisher keinen Lösungsansatz zu Tage gefördert.
Also: Ich richte auf eine...
07.06.2010 14:48:31
Thread-ID: 1160687
3 Beiträge
CommandButtons funktionieren nicht mehr
gumpwit

Hallo Gemeinde,
hatte jemand von Euch dieses Problem schon mal:
Alle neuen und bereits vorhandenen CommandButtons auf einem Excel-Sheet reagieren nicht mehr auf klicken, alle anderen Controls funktionieren ganz normal.
In Dialogen geht das einwandfrei.
Es sieht so aus, als wäre...
22.06.2010 13:28:31
Thread-ID: 1163418
5 Beiträge
CommandButtons verschwinden
Fluppe

Hallo,
Ich habe in meiner Tabelle derzeit 84 Commandbuttons. Jeder von ihnen soll einen Filter (den Wert der immer links von dem Button steht) auf dem Tabellenblatt "Zahlungsstufen" einfügen und auch auf das dieses Tabellenblatt wechseln.
Leider hab ich das Problem, dass ab und an die C...
18.07.2011 11:24:12
Thread-ID: 1222560
5 Beiträge
CommandButtons frieren ein nach Entwurfsmodus
Frederic

Hallo liebes Forum,
ich hab ein sehr nerviges Problem:
Ich habe verschiedene Buttons (3 Stück), welche "Übereinander" liegen (zeigt mir, welche "Auswahlfunktion gerade aktiviert ist"). Sieht folgendermaßen aus:
"Alle Buttons in grau und grün (Grün ist "aktiv")
Me.KEROn.Visible =...
09.02.2012 11:11:14
Thread-ID: 1249894
7 Beiträge
UserForm: CommandButtons mit Caption ausblenden
Sebastian

Hallo zusammen,
ich habe mal wieder "so ein Problem"... :-)
Ich möchte in einem alle Commandbuttons mit enem bestimmten Text in der Caption ausblenden.
so ähnlich wie
Dim tb As Object
For Each tb In UserForm_EingabeALLE.Controls
If TypeName(tb) = "CommandButton" Then tb...
13.09.2012 19:52:21
Thread-ID: 1278539
6 Beiträge
zu Commandbuttons-Textfelder hinzu...
robert

Dim aCommands(100) As New clsButton
Hi,
mit diesem Code erstellt man eine Anzahl von Commandbutons in einem Userform.
Ich bräuchte jetzt neben den Conmmandbuttons eine Textbox.
Ich habs probiert, aber ich schaff es nicht :-(
Wer kann helfen ?
Gruß
robert
Private...
10.02.2013 11:58:49
Thread-ID: 1298523
26 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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