Live-Forum - Die aktuellen Beiträge
Datum
Titel
15.10.2025 11:29:24
Algorhitmus, der kleinste Summe von Zahlen berechnet
15.10.2025 10:27:00
Zusammenführen / Synchronisieren von zwei Dateien
15.10.2025 09:51:49
Wenns mit Zahl und Buchstaben
15.10.2025 08:22:15
Privat Sub ObjExcel_Sheet Change....deaktivieren
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1164to1168
1164to1168
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Farbauswahldialog

Forumthread: Farbauswahldialog

Farbauswahldialog
wsp
Hallo Excelgemeinde,
kann der in Excel integrierte Farbauswahldialog, wie er für Schrift oder den Hintergrund von Zellen angeboten wird,
aus VBA aufgerufen werden? Das Ergebnis soll als Farbindex oder RGB-Werte an VBA zurückgegeben werden. Änderungen am gerade selektierten Objekt sollen nicht erfolgen.
Dank für eventuelle Antworten.
Wolfgang
Anzeige

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

Betreff
Benutzer
Anzeige
AW: Farbauswahldialog
05.07.2010 09:01:20
M.
Hallo,
ich kenne nur diese Variante, bei der dann aber auch die Hintegrundfarbe der aktuellen Zelle verändert wird:
Application.Dialogs(84).Show
Vielleicht hat ja jemand eine andere Idee, ich lass die Frage offen.
Viele Grüße
Rudi
Du mußt zwei Variablen deklarieren
05.07.2010 09:15:27
Matthias
Hallo
wenn ich Dich richtig verstanden habe ...
Speichere die Werte jeweils in einer als Public deklarierten Variable.
Damit stehen sie Dir weiterhin zur Verfügung.
Bsp:
https://www.herber.de/bbs/user/70429.xls
Gruß Matthias
Anzeige
AW: Farbauswahldialog
05.07.2010 09:30:51
Martin
Hallo Wolgang,
eine Möglichkeit wäre:
Sub Farbauswahl()
Dim test As Variant, colorold As Long, colornew As Long
colorold = ActiveCell.Interior.ColorIndex
test = Application.Dialogs(xlDialogPatterns).Show
If test = False Then
colornew = xlColorIndexNone
colorindexnew = 0
Else
colornew = ActiveCell.Interior.Color
colorindexnew = ActiveCell.Interior.ColorIndex
ActiveCell.Interior.ColorIndex = colorold
End If
MsgBox "Color: " & colornew & " --- ColorIndex: " & colorindexnew
End Sub
Viele Grüße
Martin
Anzeige
AW: Farbauswahldialog
05.07.2010 10:01:13
wsp
Hallo Martin,
Deine Lösung hat mir weitergeholfen. Danke . Mein Restproblem ist, dass ich die Farbauswahl aus einer
Userform aufrufe und es derzeit in der Arbeitsmappe keine ungeschützten Arbeitsblätter existieren. Ich denke,
dass ich dieses Restproblemchen mit einem nichtsichtbaren ungeschützten Arbeitsblatt lösen kann.
Nochmals danke !
Wolfgang
Anzeige
;

Forumthreads zu verwandten Themen

Farbauswahlbox freistellen möglich?
Galenzo

Hallo,
leider mußte ich auf Office 2007 wechseln. Nun vermisse ich viele von den Vorgängerversionen bekannte Features.
u.a. konnte man die Auswahlox für Zellfarbe oder auch Schriftfarbe aus der Symbolleiste herausziehen und frei plazieren. Frage: Wie ist das bei 2007 möglich?
20.10.2008 11:20:26
Thread-ID: 1017610
4 Beiträge
Farbauswahl eine Farbe mehr
geri

mit untenstehenden Macro suche ich rot+grün aus möchte noch um
eine Farbe erweitern, sehe Lösung nicht
Anpassung nehme ich an in Zeile if DatAuszug aus MakroCells(s + b, 1) = pers(u, s) ' Personalnummer in Tabelle schreiben
Cells(s + b, 2) = nam(u, s)...
24.09.2002 19:45:21
Thread-ID: 163338
6 Beiträge
Manü Farbauswahl mit Showmodal oder 0
Dieter(Drummer)

Guten Morgen Spezialisten,
mit diesem funktionierenden Code wird das Farbmenü aufgerufen und ich kann eine gewählte Farbe in die AKTIVE Zelle setzen. Ich suche die Möglichkeit eine nicht vorher aktivierte Zelle zu aktivieren, Ich weiß nicht, wie ich in dem Code "Showmodal" oder die "0", für...
16.11.2018 09:37:17
Thread-ID: 1657686
19 Beiträge
Anzeige
Farbauswahl in Textbox übernehmen
Stefan

Hallo Ihr,
ich benutze die hier im Forum gefunden Funktion:
Sub farben()
Dim i As Variant
Dim j As Long
j = ActiveCell.Interior.ColorIndex
i = Application.Dialogs(84).Show
If i False Then
Range("a1").Interior.ColorIndex = ActiveCell.Interior.ColorIndex
ActiveCell.Int...
17.10.2002 23:55:46
Thread-ID: 170589
3 Beiträge
Anzeige
Farbauswahl per Liste oder ähnlich
Stefan Koch
Hallo Spezialisten,
ich habe aus dem Forum folgendes Makro, das ich einem Button zugeordnet habe, um jede zweite Zeile zu färben.

Sub ZeilenFärben() Dim Zeile As Range, ZeilenNr As Integer For Each Zeile In Selection.Rows ZeilenNr = ZeilenNr + 1 If ZeilenNr Mod 2 = 0 Then Zeile.Interio...
13.10.2003 22:04:37
Thread-ID: 323035
6 Beiträge
Farbauswahl
Stefan
Hallo Forum,
ich habe ein kleines Problem. Mit unten stehendem Makro ( as diesem Forum )kann ich über einen Button in einer Selection jede zweite Zeile färben. Soweit, so gut, aber es ist lästig, jedesmal wenn ich eine andere Farbe will, das Makro zu bearbeiten um eine andere Farbkennzahl einzug...
08.03.2004 12:04:20
Thread-ID: 393929
4 Beiträge
Anzeige
Kombinationsfelder / Dropdownfeld mit Farbauswahl
brünette

Huhu zusammen...
...ich bins wieder :-)
Ich habe ein erneutes Problem und hoffe, dass die Spezialisten in diesem Forum mir auch diesesmal weiterhelfen können.
Ist es möglich in einer Userform ein Dropdownfeld / Listenfeld / Kombinationsfeld einzurichten, welches eine Palette an Farbe...
27.05.2004 08:34:24
Thread-ID: 433737
2 Beiträge
Farbauswahl ( Basti )
Werner

Hallo Basti,
kannst Du noch nal in die Datei sehen, das ist noch nich so gans richtig
Die Datei https://www.herber.de/bbs/user/10912.xls wurde aus Datenschutzgründen gelöscht
16.09.2004 12:39:45
Thread-ID: 485991
4 Beiträge
Anzeige
Farbauswahldialog
Helle

Hallo zusammen,
ich möchte gerne einen Farbauswahldialog haben. Der Standardialog gefällt mir nicht, bzw. erfüllt nicht meine Anforderungen. Ich hätte gerne eine UF mit Combobox in der statt eines Textes, die 56 Excel Farben dem Benutzer zur Auswahl gestellt werden.
Hat jemand eine Idee...
23.01.2005 19:22:42
Thread-ID: 553105
2 Beiträge
Gültigkeit / eingeschränkte Farbauswahl zulassen
Erich

Hallo EXCEL-Freunde,
über Daten / Gültigkeit ist es ja möglich, für bestimmte Zellen Eingabebeschränkungen
zu erstellen.
Aber geht es auch, dass ich die Hintergrundfarbe vorgeben kann?
Also ich klicke in die Zelle und dann habe ich (z.B.) eine Auswahlbox die drei
vorgegebene...
15.06.2005 20:33:17
Thread-ID: 624557
17 Beiträge
Farbauswahl auf UserForm
Rocky

Hallo leute,
gibt es ein Steuerelement für die Farbauswahl wie es in excel direkt zu fiden ist?
wenn ja wie heißt es? habs im Archiv nicht finden können!
Gruß rocky
04.07.2005 11:16:39
Thread-ID: 632314
6 Beiträge
Farbauswahl
AS

Liebe Forumer!
Nun habe ich von Michael eine Beispieldatei erhalten:
https://www.herber.de/bbs/user/24730.xls
Leider kann man dort nichts auswählen und den gewählten Wert kann man auch nicht in eine Variable initialisieren... - Vielen Dank im Vorraus!
AS
15.07.2005 10:05:46
Thread-ID: 637725
2 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige