Comment savoir le n° d'une couleur faites en MFC

Résolu
jack2125 Messages postés 486 Date d'inscription   Statut Membre Dernière intervention   -  
jordane45 Messages postés 30426 Date d'inscription   Statut Modérateur Dernière intervention   -
bonsoir
est il possible de savoir la couleur que j'ai mise par une MFC Je n'arrive pas a l'identifier avec le tableau de couleur
merci à vous

--
vous êtes super!
merci à tous

2 réponses

  1. jordane45 Messages postés 30426 Date d'inscription   Statut Modérateur Dernière intervention   4 830
     
    Bonjour,

    Sub test()
    
    MsgBox showRGB(Range("A1")) 'valeur rgb
    MsgBox showColorIndex(Range("A1")) 'valeur index code couleur excel
    MsgBox ShowHTMLcolor(Range("A1")) ' valeur hexadecimale
    
    End Sub
    
      Function showRGB(rcell)
         Dim xColor As String
         xColor = Right("000000" & Hex(rcell.Interior.color), 6)
         showRGB = Right(xColor, 2) & Mid(xColor, 3, 2) _
          & Left(xColor, 2)
      End Function
    
      Function showColorIndex(rcell)
          showColorIndex = rcell.Interior.colorIndex
      End Function
    
      Function ShowHTMLcolor(xcell) As String
         Dim xColor As String
         xColor = Right("000000" & Hex(xcell.Interior.color), 6)
         ShowHTMLcolor = "#" & Right(xColor, 2) & Mid(xColor, 3, 2) _
          & Left(xColor, 2)
      End Function
    
    
    

    0
    1. jordane45 Messages postés 30426 Date d'inscription   Statut Modérateur Dernière intervention   4 830
       
      Merci de ne pas me poser de question via la messagerie privée mais de les poursuivre dans cette discussion
      0
    2. Jack21
       
      Bonjour
      Est ce possible de l écrire par ligne merci
      0
      1. jordane45 Messages postés 30426 Date d'inscription   Statut Modérateur Dernière intervention   4 830 > Jack21
         
        par "ligne" ... c'est à dire ?

        Bien entendu.. le code que je t'ai donné permet de connaitre la couleur d'une cellule données ( en l’occurrence, dans l'exemple, la cellule A1 )

        Mais que veux tu exactement obtenir ?
        J'ai l'impression que ta question n'a rien à voir réellement avec du VBA (ou du moins.. qu'on peut faire autrement).
        Il serait bien de détailler ton besoin le plus clairement possible.

        .
        0
  2. jack2125 Messages postés 486 Date d'inscription   Statut Membre Dernière intervention  
     
    https://mon-partage.fr/f/ae4KhJ6V/
    bonjour
    je te joins mon fichier
    les couleurs sont établies avec la MFC compris entre Par exemple compris entre 91 et 100 ; compris entre 101 et 110...
    j'ai testé ton VBA mais..
    bonne journée
    0
    1. jordane45 Messages postés 30426 Date d'inscription   Statut Modérateur Dernière intervention   4 830
       
      Oui et donc ?
      Quel est le but du code vba ?
      Que veux tu faire des valeurs retournées par mon code ?

      A part avoir modifié le code pour taper sur la cellule B2 ... que veux tu faire réellement ?

      Il faudrait détailler le but de la manoeuvre si tu veux qu'on puisse essayer de t'aider.
      0