Bonjour à tous.

j'aurai besoin d'aide mais je ne sais pas comment faire sur le site car il y énormément d'onglets et je m'y perd.
Sur cette sub COULEUR() je souhaite changer la valeur de .ColorIndex =9 mais de l’extérieur à partir de la feuille ("code couleur") ("N4").
Pour le reste ça ne change pas j’écris" OK" en blanc : c'est juste le fond qui change de couleur mais de la cellule N4 de la feuille code couleur.

Est-ce que vous pouvez m'aider ou transmettre à une personne qui saurait m'aider.

Je vous remercie d'avance Cordialement.
r Leblan

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
 Sub COULEUR()
 
     ActiveWindow.RangeSelection.Interior.ColorIndex = 9
      ActiveWindow.RangeSelection.Font.ColorIndex = 2
         Selection.FormulaR1C1 = "OK"
         Selection.Font.Bold = True
     With Selection
         .HorizontalAlignment = xlCenter
         .VerticalAlignment = xlCenter
 
     End With
 
 End Sub