Discussion :

[Patmos]

Bonjour


voyez :




Merci !

[Philippe Tulliez]

Bonjour,
Pour être certain d'obtenir la couleur souhaitée, il est préférable d'utiliser la propriété Color , qui utilise le code RGB

A lire éventuellement Les couleurs en VBA Excel: Les équivalences Hex-Long-RGB

[EDIT]

Petite astuce pour connaître rapidement le code RGB d'une couleur.

• Placer la couleur dans une cellule quelconque (par exemple K2)
• Aller dans la fenêtre d'exécution et écrire cette ligne de code ? range("K2").Interior.Color et valider
  La valeur de cette couleur va s'afficher, 10086143 pour cette exemple. Il suffit alors de la copier et ensuite la coller dans notre ligne de code

[EDIT2]
Ceci dit dans mon application Excel 365 ColorIndex 4 c'est bien du vert et cela fonctionne parfaitement.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
   If Not Intersect(Target, Range("A2:I40")) Is Nothing Then
      With Target.Interior
      .ColorIndex = IIf(.ColorIndex = 4, xlNone, 4)
      End With
      Cancel = True
   End If
End Sub