Attribute VB_Name = "Couleurs"
Option Explicit

  'Constantes de couleur (palette système)
Public Const vbBlanc As Long = vbWhite
Public Const vbBleuClair As Long = &HFFC0C0
Public Const vbBleuMoyen As Long = &HFF8080
Public Const vbBleu As Long = vbBlue
Public Const vbCyanClair As Long = &HFFFFC0
'Public Const VbCyan As Long = &HFFFF80   'Constante d'origine
Public Const vbGrisClair As Long = &H8000000F
Public Const vbGrisMoyen As Long = &HC0C0C0
Public Const vbGrisFoncé As Long = &H8000000C
Public Const vbGris As Long = &HE0E0E0
Public Const vbJauneClair As Long = &HC0FFFF
Public Const vbJauneMoyen As Long = &H80FFFF
Public Const vbJaune As Long = vbYellow
Public Const vbJauneFonce As Long = &HC0C0&
Public Const vbNoir As Long = vbBlack
Public Const vbOrangeClair As Long = &HC0E0FF
Public Const vbOrangeMoyen As Long = &H80C0FF
Public Const vbOrange As Long = &H80FF
Public Const vbRougeClair As Long = &HC0C0FF
Public Const vbRougeMoyen As Long = &H8080FF
Public Const vbRouge As Long = vbRed
Public Const vbVertClair As Long = &HC0FFC0
Public Const vbVertMoyen As Long = &H80FF80
Public Const vbVert As Long = vbGreen
Public Const vbVioletClair As Long = &HFFC0FF
Public Const vbVioletMoyen As Long = &HFF80FF
Public Const vbViolet As Long = vbMagenta '&HFF00FF
Public Const vbVioletFoncé As Long = &HC000C0