VBA - Couleur

Bonjour,

désolé de redéranger pour une question aussi bête, mais je c'est comment faire pour colorier a l'interieur d'une cellule mais je ne sais pas comment colorier un texte.

Pour le moment j'ai fais sa :

Code:

---

1 2	Range("I" & i).Interior.Color = RGB(255, 0, 0) Range("I" & i).Borders.LineStyle = xlContinuous

---

Par contre pour la couleur, la j'ai mi du rouge avec RGB(255, 0, 0) mais comment faire du gris ?

Merci a vous


Krovax ... :lol::mouarf:

L'enregistreur de macro regrde ce qu'il te dit ;)

Code:

---

Range("A1").Font.ColorIndex = 3

---

Personnellement je préfère le color index que le format rgb pour les couleur

Une macro a lancer sur une feuille vierge pour avoir les corespondance couleur/valeur

Code:

---

1 2 3 4 5 6 7 8 9 10

Sub Macro12() Dim i As Integer On Error GoTo fin:: For i = 1 To 500 Cells(i, 1) = i Cells(i, 1).Interior.ColorIndex = i Next i fin:: MsgBox "ca va jusqu'à " & i-1 End Sub

---

J'utilise la gestion d'erreur car j'oublie toujours la valeur max :mouarf:

Merci krovax , la couleur grise est donc le numero 48 ;)

Code:

---

Range("I" & i).Interior.ColorIndex = 48

---

Encore merci :) j'espére que je ne te dérange pas a chaque fois :mouarf: