Vous avez apprécié ?
Partagez ;-)

Fonction VBA : color_to_hexa

La fonction VBA color_to_hexa renvoie la couleur au format hexadécimal à partir d'une valeur Color.

Utilisation :

color_to_hexa(couleur)


Exemples d'utilisation :

Couleur de fond de la cellule au format hexadécimal color_to_hexa(couleur) :

Sub exemple()

    couleur = ActiveCell.Interior.Color 'Couleur de fond de la cellule active
   
    couleur_hex = color_to_hexa(couleur) 'Couleur au format hexadécimal
   
    MsgBox "Couleur de la cellule : #" & couleur_hex 'Aperçu MsgBox

End Sub
fonction-vba-excel-color-couleur-hexadecimal - color-to-hexa

Couleur du texte au format hexadécimal color_to_hexa(couleur) :

Sub exemple2()

    couleur = ActiveCell.Font.Color 'Couleur du texte de la cellule active
   
    couleur_hex = color_to_hexa(couleur) 'Couleur au format hexadécimal
   
    MsgBox "Couleur du texte : #" & couleur_hex 'Aperçu MsgBox

End Sub
fonction-vba-excel-couleur-hexadecimal - color-to-hexa

Remarque : cette fonction nécessite l'installation du pack de fonctions XLP (un add-in gratuit pour Excel qui ajoute 65 nouvelles fonctions).