Hallo Leute!
Ich hoffe, Ihr könnt mir helfen? Ich habe bei einer UserForm einen Farbwert für die Hintergrundfarbe (BackColor). Nun müsste ich wissen, wie man die Angabe des BackColor &H00FAD3D3& in RGB-Farbwerte wandelt, da ich die RGB-Farbwerte, also rot, grün und blau, für eine Farbeinstellung in einem anderen Programm benötige.
Danke Euch für die Hilfe,
Kasimir

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Benutzer

AW: VBA-BackColor-Farbwert in RGB Farbwert wandeln?

Tino
AW: VBA-BackColor-Farbwert in RGB Farbwert wandeln?

Kasimir

AW: VBA-BackColor-Farbwert in RGB Farbwert wandeln?

27.07.2011 09:54:35

Tino

Hallo,
versuch mal so.
kommt als Code in UserForm1

Option Explicit 
 
Private Sub CommandButton1_Click() 
Dim nR, nG, nB 
 
Farbe_RGB Me.BackColor, nR, nG, nB 
 
Range("A1").Interior.Color = RGB(nR, nG, nB) 
End Sub

kommt als Code in Modul1

Option Explicit 
 
Sub Farbe_RGB(ByVal BackColorWert, nR, nG, nB) 
Dim R, G, B 
 
R = Hex(BackColorWert - (BackColorWert \ 65536) * 65536 - _
    ((BackColorWert - (BackColorWert \ 65536) * 65536) \ 256) * 256) 
 
G = Hex((BackColorWert - (BackColorWert \ 65536) * 65536) \ 256) 
 
B = Hex(BackColorWert \ 65536) 
 
If Len(R) < 2 Then R = R & "0" 
If Len(G) < 2 Then G = G & "0" 
If Len(B) < 2 Then B = B & "0" 
 
nR = CDec("&H" & R) 
nG = CDec("&H" & G) 
nB = CDec("&H" & B) 
 
End Sub

Gruß Tino

AW: VBA-BackColor-Farbwert in RGB Farbwert wandeln?

27.07.2011 10:03:36

Kasimir

Hallo Tino,
perfekt, danke Dir für Deinen VBA-Code. Der Hilft mir weiter.
Einen schönen Tag noch,
Kasimir

5 Forumthreads zu ähnlichen Themen

RGB Farben in VBA

kle

Hallo,
...noch eine Frage. Wenn ich einen bestimmten Farbton in meiner Userbox nutzen möchte, dieser aber nicht in dem Bereich "BackColor" zur Verfügung steht, wie kann ich ihn per VBA definieren ?
Habe z.B. für einen bestimmten Grünton (R: 211, G: 255 & B: 123) versucht, mit dem Ma...

14.05.2010 10:22:42

Thread-ID: 1157008

4 Beiträge

mittels VBA background color aus IE auslesen

Thomas

Hallo Ihr Lieben,
gibt es eine Möglichkeit in einer InternetExplorer.Application nach
style="background-color:#00dd00"
zu suchen und den colorcode in eine Zelle zu schreiben? Ich hab es mit
WebBrowser1.Document.body.innerHTML
WebBrowser1.Document.body.outerHTML
WebBrow...

05.08.2014 11:38:20

Thread-ID: 1374312

18 Beiträge

Bubble Chart: VBA neues Textfeld & RGB Farben

Susanne

Hallo,
ich habe 2 Probleme:
1. Neues!, zentriertes Textfeld in einem Bubblechart erstellen und Text auslesen
Ausgangslage:
a) Es existiert ein Bubblechart in dem die Bubblegröße zentriert angezeigt wird (siehe Beispiel).
b) Mittels eines Makros (aus dem Forum) lassen ich Tex...

17.06.2015 12:29:49

Thread-ID: 1431418

7 Beiträge

Links zu Excel-Dialogen

CommandButton UserForm

Beliebteste Forumthreads (12 Monate)

Threadtitel

Lesezugriffe
excel wenn zelle wort enthält

34081
excel zelle hervorheben wenn andere zelle wert

23512
excel substring bis zeichen

16681

Weitere Forumthreads anzeigen

excel in jeder zelle etwas hinzufügen

16052

excel tabelle scrollen nicht möglich

15741

excel formel ziehen ohne veränderung

15343

excel wenn enthält wort

14267

wenn wert in zelle dann wert in andere zelle

12306

excel string abschneiden bei zeichen

11938

excel erste zahl entfernen

11417

excel summe null

10634

excel bedingte formatierung wenn andere zelle text enthält

10521

zählenwenn entweder oder

9511

excel links abschneiden ab bestimmten zeichen

9498

excel prüfen, ob text in liste vorhanden

9480

excel wenn zelle 0 dann leer

9079

excel vba zelle schreiben

8864

excel links bis erstes leerzeichen

8800

excel zählen wenn datum im zeitraum

8428

excel anzahl doppelte werte nur einmal zählen

8178

excel inhalt einer zelle in eine andere übernehmen

8062

excel links ab zeichen

7989

excel ab zeichen ausgeben

7915

excel formel größer und kleiner als

7806

excel letzte zeile vba

7675

excel datum und uhrzeit in einer zelle verketten

7521

excel einblenden ausblenden button

7291

excel minuten in stunden und minuten umwandeln

7167

excel zeile nur anzeigen wenn wert

7070

excel maus kreuz

7068

excel aus kw monat ermitteln

6935

bedingte formatierung excel datum älter als

6521

summewenns ungleich mehrere kriterien

6515

excel spalten untereinander

6294

vba zellen löschen

6182

wenn negativ dann null excel

6026

excel zeiten vergleichen

6006

excel bestimmte zeichen aus zelle

5981

prüfen ob wert in spalte vorhanden

5920

excel wort aus zelle extrahieren

5910

excel shortcut reiter wechseln

5872

excel zahlenreihe automatisch fortsetzen geht nicht

5838

wenn zwei zellen leer dann

5829

excel liste durch mich selbst gesperrt

5734

excel letzte zwei zeichen abschneiden

5705

@ excel bedeutung

5689

sverweis und summewenn kombinieren

5676

excel wenn zelle nicht leer dann wert übernehmen

5582

excel suche text in zelle

5539

excel minuten addieren

5492

finden vba

5379

zählenwenn excel nicht leer

5341

excel summewenn mehrere spalten addieren

5321

excel führende nullen entfernen funktion

5224

excel zelle färben wenn andere zelle wert

5182

excel vba msgbox ja nein abbruch

5105

excel aus vor und nachname e mail

5082

wenn nv dann 0

5082

excel vba zelle hintergrundfarbe ändern

5053

excel wenn farbe dann wert

5053

excel nur zahlen stehen lassen

4974

excel wert aus tabelle übernehmen wenn bedingung erfüllt

4903

excel summewenns nicht gleich

4847

excel doppelte anführungszeichen in formel

4841

vba excel find string

4789

datum + monate excel

4769

summewenns mit datum als suchkriterium

4754

excel makro schützen

4727

excel zeichen von rechts finden

4710

if mehrere bedingungen vba

4679

liniendiagramm mit mehreren linien

4659

excel datum wird nicht erkannt

4654

excel zeilenhöhe an bild anpassen

4588

1000er feld

4564

excel erste zeichen abschneiden

4556

excel text in andere zelle übertragen

4516

vba string in zahl umwandeln

4508

vba absatz

4482

zählenwenn zelle enthält

4469

excel text suchen und spalte ausgeben

4452

excel vba check if worksheet exists

4430

vba makro stoppen

4411

excel wenn bestimmtes datum dann

4362

pivot kopieren ohne bezug

4360

excel runden auf 5 rappen

4357

aktuelle uhrzeit excel formel

4332

vba fenster schließen

4327

excel mittelwert prozent berechnen

4327

kw in datum umwandeln

4324

excel wert in spalte suchen und zeilennummer ausgeben

4308

verketten mit datumsformat

4300

excel referenz auf anderes blatt

4285

excel gruppierungen beschriften

4260

excel pivot gruppieren nicht möglich

4229

excel 2 wenn formeln in einer zelle

4199

vba neue zeile

4182

excel dropdown liste leere zellen ausblenden

4158

excel spalten sperren ohne blattschutz

4142

excel strichlierte linie entfernen

4075

excel jahreszahl einfügen

4025

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

Beliebteste Forumthreads (12 Monate)

Threadtitel

Lesezugriffe
excel wenn zelle wort enthält

34081
excel zelle hervorheben wenn andere zelle wert

23512
excel substring bis zeichen

16681

Weitere Forumthreads anzeigen

excel in jeder zelle etwas hinzufügen

16052

excel tabelle scrollen nicht möglich

15741

excel formel ziehen ohne veränderung

15343

excel wenn enthält wort

14267

wenn wert in zelle dann wert in andere zelle

12306

excel string abschneiden bei zeichen

11938

excel erste zahl entfernen

11417

excel summe null

10634

excel bedingte formatierung wenn andere zelle text enthält

10521

zählenwenn entweder oder

9511

excel links abschneiden ab bestimmten zeichen

9498

excel prüfen, ob text in liste vorhanden

9480

excel wenn zelle 0 dann leer

9079

excel vba zelle schreiben

8864

excel links bis erstes leerzeichen

8800

excel zählen wenn datum im zeitraum

8428

excel anzahl doppelte werte nur einmal zählen

8178

excel inhalt einer zelle in eine andere übernehmen

8062

excel links ab zeichen

7989

excel ab zeichen ausgeben

7915

excel formel größer und kleiner als

7806

excel letzte zeile vba

7675

excel datum und uhrzeit in einer zelle verketten

7521

excel einblenden ausblenden button

7291

excel minuten in stunden und minuten umwandeln

7167

excel zeile nur anzeigen wenn wert

7070

excel maus kreuz

7068

excel aus kw monat ermitteln

6935

bedingte formatierung excel datum älter als

6521

summewenns ungleich mehrere kriterien

6515

excel spalten untereinander

6294

vba zellen löschen

6182

wenn negativ dann null excel

6026

excel zeiten vergleichen

6006

excel bestimmte zeichen aus zelle

5981

prüfen ob wert in spalte vorhanden

5920

excel wort aus zelle extrahieren

5910

excel shortcut reiter wechseln

5872

excel zahlenreihe automatisch fortsetzen geht nicht

5838

wenn zwei zellen leer dann

5829

excel liste durch mich selbst gesperrt

5734

excel letzte zwei zeichen abschneiden

5705

@ excel bedeutung

5689

sverweis und summewenn kombinieren

5676

excel wenn zelle nicht leer dann wert übernehmen

5582

excel suche text in zelle

5539

excel minuten addieren

5492

finden vba

5379

zählenwenn excel nicht leer

5341

excel summewenn mehrere spalten addieren

5321

excel führende nullen entfernen funktion

5224

excel zelle färben wenn andere zelle wert

5182

excel vba msgbox ja nein abbruch

5105

excel aus vor und nachname e mail

5082

wenn nv dann 0

5082

excel vba zelle hintergrundfarbe ändern

5053

excel wenn farbe dann wert

5053

excel nur zahlen stehen lassen

4974

excel wert aus tabelle übernehmen wenn bedingung erfüllt

4903

excel summewenns nicht gleich

4847

excel doppelte anführungszeichen in formel

4841

vba excel find string

4789

datum + monate excel

4769

summewenns mit datum als suchkriterium

4754

excel makro schützen

4727

excel zeichen von rechts finden

4710

if mehrere bedingungen vba

4679

liniendiagramm mit mehreren linien

4659

excel datum wird nicht erkannt

4654

excel zeilenhöhe an bild anpassen

4588

1000er feld

4564

excel erste zeichen abschneiden

4556

excel text in andere zelle übertragen

4516

vba string in zahl umwandeln

4508

vba absatz

4482

zählenwenn zelle enthält

4469

excel text suchen und spalte ausgeben

4452

excel vba check if worksheet exists

4430

vba makro stoppen

4411

excel wenn bestimmtes datum dann

4362

pivot kopieren ohne bezug

4360

excel runden auf 5 rappen

4357

aktuelle uhrzeit excel formel

4332

vba fenster schließen

4327

excel mittelwert prozent berechnen

4327

kw in datum umwandeln

4324

excel wert in spalte suchen und zeilennummer ausgeben

4308

verketten mit datumsformat

4300

excel referenz auf anderes blatt

4285

excel gruppierungen beschriften

4260

excel pivot gruppieren nicht möglich

4229

excel 2 wenn formeln in einer zelle

4199

vba neue zeile

4182

excel dropdown liste leere zellen ausblenden

4158

excel spalten sperren ohne blattschutz

4142

excel strichlierte linie entfernen

4075

excel jahreszahl einfügen

4025

Archiv - Verwandte Themen

Forumthread

Beiträge

rgb farben in vba

unter vba rgb farben wieder auslesen

mittels vba background color aus ie auslesen

bubble chart: vba neues textfeld & rgb farben

vba: formen einfärben (rgb)

VBA-BackColor-Farbwert in RGB Farbwert wandeln?

2 Beiträge zum Forumthread Beiträge zu diesem Forumthread

5 Forumthreads zu ähnlichen Themen

VBA Beispiele zu verwandten Themen

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread