Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.10.2025 09:06:52
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Dezimal Farbcode in Hex

Dezimal Farbcode in Hex
17.10.2018 22:06:01
MarC
Hallihallo,
kann mir jemand sagen wie ich die Farbe 255, 192, 0 in Hex für mein UserForm umwandeln kann? Im Internet finde ich zwar Methoden aber da ist der Code zu kurz
Anzeige

12
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Dezimal Farbcode in Hex
17.10.2018 22:41:35
Mullit
Hallo,
hm, reicht Dir da nicht die RGB-Funktion...?
Private Sub UserForm_Activate()
Me.CommandButton1.BackColor = RGB(255, 192, 0)
End Sub

Gruß, Mullit
AW: Dezimal Farbcode in Hex
17.10.2018 22:45:43
MarC
Hi Mullit, das reicht mir leider nicht. Ich möchte ja das UserForm einfärben und auf eine Schrift.
Der Farbcode sieht z.B. so aus myCtl.ForeColor = &H80000012
Anzeige
AW: Dezimal Farbcode in Hex
17.10.2018 22:52:26
Mullit
Hallo,
ja gut hat aber ja erstmal nix mit Hex zu tun, geht doch mit der Funktion genauso:
Private Sub UserForm_Activate()
Me.BackColor = RGB(255, 192, 0)
Me.CommandButton1.ForeColor = RGB(150, 54, 52)
End Sub

Gruß, Mullit
AW: Dezimal Farbcode in Hex
17.10.2018 22:56:11
MarC
Wie stelle ich das an wenn ich per Button das Userform wie folgt aufrufe:
Private Sub cmdGetDate_Click()
frmCalendar.Show
Range("Datum") = g_datCalendarDate
End Sub

Anzeige
AW: Dezimal Farbcode in Hex
17.10.2018 22:56:13
MarC
Wie stelle ich das an wenn ich per Button das Userform wie folgt aufrufe:
Private Sub cmdGetDate_Click()
frmCalendar.Show
Range("Datum") = g_datCalendarDate
End Sub

AW: Dezimal Farbcode in Hex
17.10.2018 23:02:28
Mullit
Hallo,
ähh wie jetzt, wie stellst Du was an...?... werd mal deutlicher...;-)
Gruß, Mullit
Anzeige
AW: Dezimal Farbcode in Hex
17.10.2018 23:05:26
MarC
ah ok, also ich habe einen button mit dem ich ein userform (Kalender) aufrufe. Den Kalender Hintergrund welcher ein Label ist würde ich gerne in einer anderen Farbe darstellen. Die Farbe die ich gerne hätte steht mir leider nicht zur Auswahl daher wollte ich es mit einem HexCode angeben.
AW: Dezimal Farbcode in Hex
17.10.2018 23:55:08
Mullit
Hallo,
ah ok, deswegen Dein Hex-Ansatz, ja entweder Du weist Deinem Label bei Aufruf die Farbe zu bspw. mit der RGB-Funktion...
Private Sub cmdGetDate_Click()
frmCalendar.Label1.BackColor = RGB(255, 192, 0)
frmCalendar.Show
Range("Datum") = g_datCalendarDate
End Sub

...oder Du konvertierst in Hex mit Hex(RGB(255, 192, 0)) und fügst das ins Eigenschaftsfenster des Labels ein ggf. noch mit nem Color-Table...
http://www.farb-tabelle.de/en/table-of-color.htm
Gruß, Mullit
Anzeige
Danke =)
17.10.2018 23:59:29
MarC
Danke für deine Hilfe Mullit,
ich habe jetzt doch was im Netz gefunden um mir die Farbcodes übersetzen zu lassen:
Sub farbe()
Dim mycolor
mycolor = ActiveCell.Interior.Color
ActiveCell.Offset(0, 1) = "&H" & Right("00000000" & Hex$(mycolor), 8) & "&"
ActiveCell.Offset(0, 2) = mycolor
End Sub

Anzeige
AW: Danke =)
18.10.2018 00:08:21
Mullit
Hallo,
okidoki, aber wie gesagt eigentl. brauchts keine Übersetz., für das Festlegen der Farbe im Eigenschaftsfenster reicht direkt die Eingabe des Long-Wertes der Color-Eig. der Zelle, wird dann im Fenster automat. in einen Hex-Wert konvertiert.....
Gruß, Mullit
AW: Dezimal Farbcode in Hex
18.10.2018 00:00:55
Mullit
Hallo nochmal,
fürs Eigenschaftsfenster reicht weiter auch einfach die Eingabe des Rückgabewertes der RGB-Funktion bspw. Debug.Print RGB(255, 192, 0) ....
Gruß, Mullit
Anzeige
AW: Dezimal Farbcode in Hex
18.10.2018 00:17:16
MarC
Danke nochmal Mullit, damit kann ich jetzt meine Buttons einfärben ^^
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Farbcode von Dezimal in Hex umwandeln in Excel


Schritt-für-Schritt-Anleitung

Um einen RGB-Farbcode, wie beispielsweise 255, 192, 0, in einen Hexadezimal-Farbcode umzuwandeln, kannst du folgende Schritte durchführen:

  1. Öffne Excel: Starte Microsoft Excel und öffne ein neues oder bestehendes Arbeitsblatt.

  2. VBA-Editor öffnen: Drücke ALT + F11, um den Visual Basic for Applications (VBA) Editor zu öffnen.

  3. Neues Modul einfügen: Klicke im Menü auf Einfügen und wähle Modul.

  4. Füge den Code ein: Kopiere den folgenden Code in das Modul:

    Function RGBtoHex(r As Integer, g As Integer, b As Integer) As String
       RGBtoHex = "#" & Hex(r) & Hex(g) & Hex(b)
    End Function
  5. Funktion nutzen: Schließe den VBA-Editor und gehe zurück zu Excel. Du kannst nun die Funktion RGBtoHex verwenden, um die Farbe in Hexadezimal umzuwandeln. Zum Beispiel:

    =RGBtoHex(255, 192, 0)

    Dies gibt den Wert #FFC000 zurück.


Häufige Fehler und Lösungen

  • Fehler: #NAME?
    Wenn du #NAME? erhältst, überprüfe, ob die Funktion im richtigen Modul gespeichert wurde und ob der Name korrekt eingegeben wurde.

  • Falsches Farbergebnis:
    Stelle sicher, dass die RGB-Werte im Bereich von 0 bis 255 liegen. Werte außerhalb dieses Bereichs führen zu unerwarteten Ergebnissen.


Alternative Methoden

Eine alternative Methode zur Umwandlung von RGB in Hex ist die Verwendung der DEC2HEX-Funktion in Excel zusammen mit einer Umrechnung der RGB-Werte:

  1. Verwende DEC2HEX für jeden Farbwert:
    =DEC2HEX(255) & DEC2HEX(192) & DEC2HEX(0)
  2. Dies gibt die Hex-Werte zurück, die du dann manuell zusammenfügen musst, um den vollständigen Farbcode zu erhalten.

Praktische Beispiele

Hier sind einige Beispiele für die Umwandlung von RGB in Hex:

  • Beispiel 1: Umwandlung von 255, 0, 0 (Rot)

    =RGBtoHex(255, 0, 0)

    Ergebnis: #FF0000

  • Beispiel 2: Umwandlung von 0, 255, 0 (Grün)

    =RGBtoHex(0, 255, 0)

    Ergebnis: #00FF00

  • Beispiel 3: Umwandlung von 0, 0, 255 (Blau)

    =RGBtoHex(0, 0, 255)

    Ergebnis: #0000FF


Tipps für Profis

  • Farbcode-Tabelle nutzen: Nutze eine Farbcode-Tabelle Hex, um die benötigten Farben schnell zu finden und ihre Hex-Werte zu überprüfen.

  • VBA-Farbcode für UserForms: Wenn du Farben für UserForms festlegen möchtest, kannst du den Hex-Code direkt in den Eigenschaften der Steuerelemente verwenden. Zum Beispiel:

    Me.Label1.BackColor = &HFFC000
  • Farbcode übersetzen: Verwende den VBA-Code von MarC, um bereits vorhandene Zellenfarben in Hex zu übersetzen:

    Sub farbe()
       Dim mycolor
       mycolor = ActiveCell.Interior.Color
       ActiveCell.Offset(0, 1).Value = "&H" & Right("00000000" & Hex$(mycolor), 8)
    End Sub

FAQ: Häufige Fragen

1. Wie kann ich 255 in Hex umwandeln?
Um 255 in Hexadezimal umzuwandeln, verwende die Excel-Funktion DEC2HEX:

=DEC2HEX(255)

Dies ergibt FF.

2. Gibt es eine einfache Möglichkeit, RGB-Werte in Hex zu konvertieren?
Ja, die beste Methode ist die Verwendung einer benutzerdefinierten VBA-Funktion wie RGBtoHex, die eine einfache Umwandlung ermöglicht.

Beliebteste Forumthreads (12 Monate)

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