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

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

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