Discussion :

[Potzo]

Bonjour a tous,

je souhaite modifier une macro qui effectue une recherche a partir d'une syntaxe du type :

Code :

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

If Trim(UCase(c.Value)) Like "*ERGEBNIS*" Then

J'aimerai maintenant que le critere soit une couleur presente dans mon classeur.
mes recherches m'ont juste conduit a la fonction QBColor, mais j'ai pas l'impression qu'elle soit adaptee a ce que je veux.

En outre je ne sais pas si je peux obtenir a partir dExcel le code RGB de ma couleur


Merci d'avance

[Potzo]

Concernant le code de la couleur, j'ai trouve grace au tuto du site, ou j'ai telecharge la petit application.

http://silkyroad.developpez.com/VBA/...CodesCouleurs/

[babaothe]

salut

bien
par contre, en ce qui concerne :

je souhaite modifier une macro qui effectue une recherche a partir d'une syntaxe du type :
LIKE"*CARACTERE*"

l'opérateur LIKE ne peut s'appliquer ni à une couleur, ni à ses composantes. Il ne concerne que les chaines de caractères.

Si donc, il s'agit (étonnant, mais...) ,de sélectionner les couleurs "raprrochantes" d'une couleur, tu ne pourras faire de comparaisons valables qu'en définissant un "delta d'écart" admissible pour chaque composante et faire ensuite ta sélection ainsi limitée. Si tel est vraiment là ton voeu (bien que surprenant), tu trouveras ta solution en examinant et analysant des codes VB6 de posterisation d'images en couleurs.

[Potzo]

J'avais utilise la syntaxe like, parce que j'avais des chaines de caractere.

Maintenant que je veux le faire par couleur, j'ai des references de couleur tres precises.

[Potzo]

Code :

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

If Trim(UCase(c.Interior.Color)) = 10092543

J'ai ajoute ca et ca marche.