Fonction VBA : colorToHexa

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

Utilisation :

colorToHexa(couleur)

Exemples d'utilisation

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

Sub exemple()

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

End Sub

fonction vba excel color couleur hexadecimal to hexa

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

Sub exemple2()

    couleur = ActiveCell.Font.Color 'Couleur du texte de la cellule active
    
    couleurHex = colorToHexa(couleur) 'Couleur au format hexadécimal
    
    MsgBox "Couleur du texte : #" & couleurHex '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 92 nouvelles fonctions).