.ShowColor

[Blatt]

Hi,
ich möchte wissen, wie man mit der Funktion die Farbe umstellen kann ..

Private Sub Form_Load()
CommonDialog.ShowColor
End Sub

Und wie geht das jetzt, dass, wenn man estwas in z.B. eine Textbox eingibt, die Farbe z.B. grün ist.

Danke für Hilfe

 

[Shakie]

Welche Farbe soll sich ändern? Wählt der User mit dem ShowColor-Dialog eine Farbe aus, so wird diese in der "Color"-Eigenschaft des CommonDialog-Controls gespeichert:

CommonDialog1.ShowColor
NeueFarbe = CommonDialog1.Color

 

[Blatt]

Und wie krieg ich davon den HTML Hex Code? =)

 

[Shakie]

Einfach in Hex umrechnen?! Ich versteh nicht wo das Problem liegt.

Dim Text_Zahl_In_Hex As String
Dim Zahl As Integer
Zahl = 123
Text_Zahl_In_Hex = vba.Conversion.Hex(Zahl)