demande d'aide

[skandy]

Bonjour,
une demande au expert parceque moi je suis nulllllll. Comme faire avec une macro vb pour colrer en vert les veleurs dans le cadre si elle la trouve dans la colonne A & en rouge si la valeur n'existe pas dans la colonne, Merci d'avance

 

[Robert]

Bonjour Skandy, bonjour le forum,

Qu'appelles-tu le cadre ? Ton fichier en pièce jointe serait le bienvenu. Regarde ce Lien supprimé[/color] pour envoyer un fichier en pièce jointe.

 

[Abel]

Bonjour skandy,

Hein ?

Peux tu reformuler ta question, s'il te plait.
Ou alors nous donner quelques précisions car là, j'avoue que la demande est un peu floue ...

Abel.

ps : la prochaine fois que tu postes une question, mets un sujet plus explicite.
Celui que tu a mis n'aide pas pour les recherches et n'éclaire personne sur le contenu de la demande.
Prends un peu de temps pour lire la charte.
A bientôt.

 

[Abel]

Re,

M.... ! Sur quoi j'ai marché ?
Tiens, un neurone ?!
Oh pardon Robert ! T'avais pas vu !
Hi hi !

Abel.

 

[skandy]

Bonjour,

Merci abel et robert pour vos réponse
Je reformule dans la pièce jointe j'ai des chiffres éparpiller dans le champ C10:K23
Et j’ai une liste dans le champ A:A

Ma demande c’est comment colorer en vert les valeurs du champ C10:K23 si ces derniers existe dans la colonne A et en rouge dans le cas contraire

merci d'avance
[file name=exemple_20051026135437.zip size=5216]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/exemple_20051026135437.zip[/file]

 

[Robert]

Bonjour Skandy, Abel, bonjour le forum,

Désolé Skandy, je règle son cas à Abel puis je m'occupe du tien...

Alors comme ça Môssieur Abel ramène ça fraise... C'est quoi ? C'est la proximité Halloween qui te permet de sortir un peu ?

Et paf !!!

 

[Skandy]

Ok 🙂
je vous attends

 

[Dull]

Salut skandy, Robert, abel et le Forum

laissont les regler leur comptes

sinon je te renvoi ton fichier avec un début de réponse

MFC (Mise en forme conditionnel) me parait très approprié :woohoo:

@+ [file name=exemple_20051026141233.zip size=5545]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/exemple_20051026141233.zip[/file]

 

[skandy]

merci abdel pour l'example

mais c'est le cas contraire que je cherche c'est a dire en changent les valeur de la Colonne A que les modifs se fait automatiquement
toi t'as fait le contraire.

 

[Abel]

Re,

Aïeeuuuuhh ! Pas là on avait dit !


Bon, pour Sakandy, j'avais préparé un petit truc basé aussi sur les MFC mais sur une formule RECHERCHEV.
Ca revient au même principe que Dull.

Et ça marche. Essaie voir de rajouter '113' dans la colonne A.

Par contre, les cellules vides restent en rouge. Ce qui n'est peut être pas forcément du meilleur goût. Faudra un peu améliorer les formules.

Abel. [file name=exempleSkandy.zip size=4317]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/exempleSkandy.zip[/file]

 

[Skandy]

Merci beaucoup les gas pour vos réponse ainsi que votre aides robert abdel & Dull

oui cette exemple me va tres bien

pour vous remercier je pourrais vous envoyer des invitation pour crerer des compte sur gmail de google
vous n'avez qu'a m'envoyer des message sur cette ma boite s.nasri@gmail.com.

merci beaucoup

 

[Robert]

Bonjour Skandy, Abel, Dull, bonjour le forum,

Argh ! À cause de ma connexion qui galère je me fait griller par Abel !!! J'enrage...

Tant pis, je te propose cette macro événementielle :

Private Sub Worksheet_Change(ByVal Target As Range)
Dim pl As Range 'déclare la variable pl
Dim cel1 As Range, cel2 As Range 'déclare les variable Cel1 et cel2

Set pl = Range('A1:A' & Range('A65536').End(xlUp).Row) 'définit la variable pl
If Not Application.Intersect(Target, pl) Is Nothing Then

For Each cel2 In Range('C10:K23') 'boucle 1 sur toutes les cellules cel1 du cadre

If cel2 <> '' Then 'consition 1 : si la cellule cel1 n'est pas vide
'boucle 2 : sur toutes le cellules éditées de la colonne A

For Each cel1 In pl
'condition 2 : si les cellules sont identiques

If cel2.Value = cel1.Value Then
cel2.Interior.ColorIndex = 3 'colorie le motif en rouge
GoTo suite 'va à la balise 'suite'
End If 'fin de la condition 2

Next cel1 'prochaine cellule de la colonne A

cel2.Interior.ColorIndex = 50 'colorie le motif en vert
End If 'fin de la condition 1

suite: 'balise
Next cel2 'prochaine cellule du cadre
End If

End Sub

 

[Abel]

Re,

Ah ben ouais. Je l'aurais pensée pas aussi rapide c'est pour ça que je l'avais faite en MFC.

Sinon, moi, j'aurais plutôt mis les valeurs présentes en vert et les absentes en rouge. A part ça, c'est pas mal.

Pffffff ffffff fffff rrr rrr !


Abel.

 

[herve62]

Salut Skandy

J'ai été un peu moins rapide que les autres , mais comme j'ai ecris la macro , au moins qu'elle te profite
exemple attaché
Herve62

 

[Herve62]

Je pense attachement Raté !
Bis [file name=cell_couleur.zip size=11300]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/cell_couleur.zip[/file]