Bonjour,

pourquoi lorsque j'inscris un texte dans une cellule et que je veux ensuite le mettre en couleur, la cellule dans laquelle est placée ce mot apparaît encadrée ?
Exemple :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
 
Sub Machin
    Range("A1").Value = "machin"
    Range("A1").Select
    With Selection.Font
        .Color = RGB(255, p, p)
        .TintAndShade = 0
    End With
End Sub
Merci de votre aide, excusez-moi si la question est stupide et cordiales salutations.