Bonjour à tous,
J'ai une nouvelle fois besoin de votre aide, j'espère que vous pourrez
m'aider...
J'ai un fichier Exel dans lequel j'ai en la feuil 1 dans la colonne A
une liste de mot et en feuil2 également dans la colonne A une autre
liste de mot (environ 2000 mots).
L'ideal pour moi serait d'avoir une macro qui affiche sur les autres
feuilles du classeur, en vert les cellules qui contiennent (et non pas
strictement identique) un mot de la feuil 1 et en rouge celles qui
contiennent un mot de la feuil 2 (et rien si le mot n'est issu ni de
la liste de la feuil1 ni celui de la feuil2)
Est-ce réalisable? Ou il y a t-il une autre solution plus simple?
Vous remerciant par avance pour votre aide
Bonjour à tous,
J'ai une nouvelle fois besoin de votre aide, j'espère que vous pourrez
m'aider...
J'ai un fichier Exel dans lequel j'ai en la feuil 1 dans la colonne A
une liste de mot et en feuil2 également dans la colonne A une autre
liste de mot (environ 2000 mots).
L'ideal pour moi serait d'avoir une macro qui affiche sur les autres
feuilles du classeur, en vert les cellules qui contiennent (et non pas
strictement identique) un mot de la feuil 1 et en rouge celles qui
contiennent un mot de la feuil 2 (et rien si le mot n'est issu ni de
la liste de la feuil1 ni celui de la feuil2)
Est-ce réalisable? Ou il y a t-il une autre solution plus simple?
Vous remerciant par avance pour votre aide
Bonjour à tous,
J'ai une nouvelle fois besoin de votre aide, j'espère que vous pourrez
m'aider...
J'ai un fichier Exel dans lequel j'ai en la feuil 1 dans la colonne A
une liste de mot et en feuil2 également dans la colonne A une autre
liste de mot (environ 2000 mots).
L'ideal pour moi serait d'avoir une macro qui affiche sur les autres
feuilles du classeur, en vert les cellules qui contiennent (et non pas
strictement identique) un mot de la feuil 1 et en rouge celles qui
contiennent un mot de la feuil 2 (et rien si le mot n'est issu ni de
la liste de la feuil1 ni celui de la feuil2)
Est-ce réalisable? Ou il y a t-il une autre solution plus simple?
Vous remerciant par avance pour votre aide
If IsNumeric(Application.Match("*" & sh.Cells(i, 1) & "*", plage1, 0)) And _
IsNumeric(Application.Match("*" & Cells(i, 1) & "*", plage2, 0)) Then _
sh.Cells(i, 1).Interior.ColorIndex = 7
Bonjour,
Ceci recherche dans toutes les feuilles du classeur à l'exception de feuil1 et feuils2 dans la colonne A une
partie du mot contenu dans feuil 1 ou/et dans feuil 2
En rouge ceux qui sont en feuil 2
En vert ceux qui sont en feuil 1
Et d'une autre couleur ceux qui sont dans les deux
'------------------
Sub jj()
Dim sh As Worksheet
derlg = Sheets("feuil1").Cells(Rows.Count, 1).End(3).Row
Set plage1 = Sheets("feuil1").Range("a2:a" & derlg)
derlg = Sheets("feuil2").Cells(Rows.Count, 1).End(3).Row
Set plage2 = Sheets("feuil2").Range("a2:a" & derlg)
For Each sh In ThisWorkbook.Worksheets
If sh.Name <> "Feuil1" And sh.Name <> "Feuil2" Then
For i = 2 To Sheets(sh.Name).Cells(Rows.Count, 1).End(3).Row
If IsNumeric(Application.Match("*" & sh.Cells(i, 1) & "*", plage1, 0)) Then _
sh.Cells(i, 1).Interior.ColorIndex = 4
If IsNumeric(Application.Match("*" & sh.Cells(i, 1) & "*", plage2, 0)) Then _
sh.Cells(i, 1).Interior.ColorIndex = 3
If IsNumeric(Application.Match("*" & sh.Cells(i, 1) & "*", plage1, 0)) And _
IsNumeric(Application.Match("*" & Cells(i, 1) & "*", plage2, 0)) Then _
sh.Cells(i, 1).Interior.ColorIndex = 7
Next
End If
Next
End Sub
"------------------------
--
Salutations
JJ
"elodie005" a écrit dans le message de news:
Bonjour à tous,
J'ai une nouvelle fois besoin de votre aide, j'espère que vous pourrez
m'aider...
J'ai un fichier Exel dans lequel j'ai en la feuil 1 dans la colonne A
une liste de mot et en feuil2 également dans la colonne A une autre
liste de mot (environ 2000 mots).
L'ideal pour moi serait d'avoir une macro qui affiche sur les autres
feuilles du classeur, en vert les cellules qui contiennent (et non pas
strictement identique) un mot de la feuil 1 et en rouge celles qui
contiennent un mot de la feuil 2 (et rien si le mot n'est issu ni de
la liste de la feuil1 ni celui de la feuil2)
Est-ce réalisable? Ou il y a t-il une autre solution plus simple?
Vous remerciant par avance pour votre aide
If IsNumeric(Application.Match("*" & sh.Cells(i, 1) & "*", plage1, 0)) And _
IsNumeric(Application.Match("*" & Cells(i, 1) & "*", plage2, 0)) Then _
sh.Cells(i, 1).Interior.ColorIndex = 7
Bonjour,
Ceci recherche dans toutes les feuilles du classeur à l'exception de feuil1 et feuils2 dans la colonne A une
partie du mot contenu dans feuil 1 ou/et dans feuil 2
En rouge ceux qui sont en feuil 2
En vert ceux qui sont en feuil 1
Et d'une autre couleur ceux qui sont dans les deux
'------------------
Sub jj()
Dim sh As Worksheet
derlg = Sheets("feuil1").Cells(Rows.Count, 1).End(3).Row
Set plage1 = Sheets("feuil1").Range("a2:a" & derlg)
derlg = Sheets("feuil2").Cells(Rows.Count, 1).End(3).Row
Set plage2 = Sheets("feuil2").Range("a2:a" & derlg)
For Each sh In ThisWorkbook.Worksheets
If sh.Name <> "Feuil1" And sh.Name <> "Feuil2" Then
For i = 2 To Sheets(sh.Name).Cells(Rows.Count, 1).End(3).Row
If IsNumeric(Application.Match("*" & sh.Cells(i, 1) & "*", plage1, 0)) Then _
sh.Cells(i, 1).Interior.ColorIndex = 4
If IsNumeric(Application.Match("*" & sh.Cells(i, 1) & "*", plage2, 0)) Then _
sh.Cells(i, 1).Interior.ColorIndex = 3
If IsNumeric(Application.Match("*" & sh.Cells(i, 1) & "*", plage1, 0)) And _
IsNumeric(Application.Match("*" & Cells(i, 1) & "*", plage2, 0)) Then _
sh.Cells(i, 1).Interior.ColorIndex = 7
Next
End If
Next
End Sub
"------------------------
--
Salutations
JJ
"elodie005" <newoceane2000@yahoo.fr> a écrit dans le message de news:
35b68781-608f-419f-ab51-d0665f6a2d3b@j23g2000yqc.googlegroups.com...
Bonjour à tous,
J'ai une nouvelle fois besoin de votre aide, j'espère que vous pourrez
m'aider...
J'ai un fichier Exel dans lequel j'ai en la feuil 1 dans la colonne A
une liste de mot et en feuil2 également dans la colonne A une autre
liste de mot (environ 2000 mots).
L'ideal pour moi serait d'avoir une macro qui affiche sur les autres
feuilles du classeur, en vert les cellules qui contiennent (et non pas
strictement identique) un mot de la feuil 1 et en rouge celles qui
contiennent un mot de la feuil 2 (et rien si le mot n'est issu ni de
la liste de la feuil1 ni celui de la feuil2)
Est-ce réalisable? Ou il y a t-il une autre solution plus simple?
Vous remerciant par avance pour votre aide
If IsNumeric(Application.Match("*" & sh.Cells(i, 1) & "*", plage1, 0)) And _
IsNumeric(Application.Match("*" & Cells(i, 1) & "*", plage2, 0)) Then _
sh.Cells(i, 1).Interior.ColorIndex = 7
Bonjour,
Ceci recherche dans toutes les feuilles du classeur à l'exception de feuil1 et feuils2 dans la colonne A une
partie du mot contenu dans feuil 1 ou/et dans feuil 2
En rouge ceux qui sont en feuil 2
En vert ceux qui sont en feuil 1
Et d'une autre couleur ceux qui sont dans les deux
'------------------
Sub jj()
Dim sh As Worksheet
derlg = Sheets("feuil1").Cells(Rows.Count, 1).End(3).Row
Set plage1 = Sheets("feuil1").Range("a2:a" & derlg)
derlg = Sheets("feuil2").Cells(Rows.Count, 1).End(3).Row
Set plage2 = Sheets("feuil2").Range("a2:a" & derlg)
For Each sh In ThisWorkbook.Worksheets
If sh.Name <> "Feuil1" And sh.Name <> "Feuil2" Then
For i = 2 To Sheets(sh.Name).Cells(Rows.Count, 1).End(3).Row
If IsNumeric(Application.Match("*" & sh.Cells(i, 1) & "*", plage1, 0)) Then _
sh.Cells(i, 1).Interior.ColorIndex = 4
If IsNumeric(Application.Match("*" & sh.Cells(i, 1) & "*", plage2, 0)) Then _
sh.Cells(i, 1).Interior.ColorIndex = 3
If IsNumeric(Application.Match("*" & sh.Cells(i, 1) & "*", plage1, 0)) And _
IsNumeric(Application.Match("*" & Cells(i, 1) & "*", plage2, 0)) Then _
sh.Cells(i, 1).Interior.ColorIndex = 7
Next
End If
Next
End Sub
"------------------------
--
Salutations
JJ
"elodie005" a écrit dans le message de news:
Bonjour à tous,
J'ai une nouvelle fois besoin de votre aide, j'espère que vous pourrez
m'aider...
J'ai un fichier Exel dans lequel j'ai en la feuil 1 dans la colonne A
une liste de mot et en feuil2 également dans la colonne A une autre
liste de mot (environ 2000 mots).
L'ideal pour moi serait d'avoir une macro qui affiche sur les autres
feuilles du classeur, en vert les cellules qui contiennent (et non pas
strictement identique) un mot de la feuil 1 et en rouge celles qui
contiennent un mot de la feuil 2 (et rien si le mot n'est issu ni de
la liste de la feuil1 ni celui de la feuil2)
Est-ce réalisable? Ou il y a t-il une autre solution plus simple?
Vous remerciant par avance pour votre aide
Bonjour,
Tu pourrais le faire en utilisant une mise en forme conditionnelle.
A ) Attribue en nom (insertion / nom / d finir) la colonne A1:Ax de la fe uil1
B ) Attribue aussi un nom la plage A1:Ax de la feuil2
Pour ce faire, tu peux utiliser la fonction "Decaler()" pour que ta plage se mettre jour...
Les 2 formules pour la mise en forme conditionnelle pour les cellules con cern es en feuil3 par exemple :
=ESTNUM(EQUIV("*"&A1&"*";Plg;0)) 'Plg -> plage feuil1
=ESTNUM(EQUIV("*"&A1&"*";Rg;0)) 'Rg -> plage feuil2
Si A1 de la feuil3 contient au moins une cha ne de caract res d finie dan s la plage "Plg" la mise en forme
s'appliquera... il en est de m me pour la feuil2.
Qu'est-ce qui doit se passer si la cha ne de caract res appartient en m m e temps la feuil1 et la feuil2 ? Est-ce
possible ? Si oui, la mise en forme conditionnelle est compl ter!
MichD
--------------------------------------------
"elodie005" a crit dans le message de groupe de discussion :
Bonjour tous,
J'ai une nouvelle fois besoin de votre aide, j'esp re que vous pourrez
m'aider...
J'ai un fichier Exel dans lequel j'ai en la feuil 1 dans la colonne A
une liste de mot et en feuil2 galement dans la colonne A une autre
liste de mot (environ 2000 mots).
L'ideal pour moi serait d'avoir une macro qui affiche sur les autres
feuilles du classeur, en vert les cellules qui contiennent (et non pas
strictement identique) un mot de la feuil 1 et en rouge celles qui
contiennent un mot de la feuil 2 (et rien si le mot n'est issu ni de
la liste de la feuil1 ni celui de la feuil2)
Est-ce r alisable? Ou il y a t-il une autre solution plus simple?
Vous remerciant par avance pour votre aide
Bonjour,
Tu pourrais le faire en utilisant une mise en forme conditionnelle.
A ) Attribue en nom (insertion / nom / d finir) la colonne A1:Ax de la fe uil1
B ) Attribue aussi un nom la plage A1:Ax de la feuil2
Pour ce faire, tu peux utiliser la fonction "Decaler()" pour que ta plage se mettre jour...
Les 2 formules pour la mise en forme conditionnelle pour les cellules con cern es en feuil3 par exemple :
=ESTNUM(EQUIV("*"&A1&"*";Plg;0)) 'Plg -> plage feuil1
=ESTNUM(EQUIV("*"&A1&"*";Rg;0)) 'Rg -> plage feuil2
Si A1 de la feuil3 contient au moins une cha ne de caract res d finie dan s la plage "Plg" la mise en forme
s'appliquera... il en est de m me pour la feuil2.
Qu'est-ce qui doit se passer si la cha ne de caract res appartient en m m e temps la feuil1 et la feuil2 ? Est-ce
possible ? Si oui, la mise en forme conditionnelle est compl ter!
MichD
--------------------------------------------
"elodie005" a crit dans le message de groupe de discussion :
35b68781-608f-419f-ab51-d0665f6a2...@j23g2000yqc.googlegroups.com...
Bonjour tous,
J'ai une nouvelle fois besoin de votre aide, j'esp re que vous pourrez
m'aider...
J'ai un fichier Exel dans lequel j'ai en la feuil 1 dans la colonne A
une liste de mot et en feuil2 galement dans la colonne A une autre
liste de mot (environ 2000 mots).
L'ideal pour moi serait d'avoir une macro qui affiche sur les autres
feuilles du classeur, en vert les cellules qui contiennent (et non pas
strictement identique) un mot de la feuil 1 et en rouge celles qui
contiennent un mot de la feuil 2 (et rien si le mot n'est issu ni de
la liste de la feuil1 ni celui de la feuil2)
Est-ce r alisable? Ou il y a t-il une autre solution plus simple?
Vous remerciant par avance pour votre aide
Bonjour,
Tu pourrais le faire en utilisant une mise en forme conditionnelle.
A ) Attribue en nom (insertion / nom / d finir) la colonne A1:Ax de la fe uil1
B ) Attribue aussi un nom la plage A1:Ax de la feuil2
Pour ce faire, tu peux utiliser la fonction "Decaler()" pour que ta plage se mettre jour...
Les 2 formules pour la mise en forme conditionnelle pour les cellules con cern es en feuil3 par exemple :
=ESTNUM(EQUIV("*"&A1&"*";Plg;0)) 'Plg -> plage feuil1
=ESTNUM(EQUIV("*"&A1&"*";Rg;0)) 'Rg -> plage feuil2
Si A1 de la feuil3 contient au moins une cha ne de caract res d finie dan s la plage "Plg" la mise en forme
s'appliquera... il en est de m me pour la feuil2.
Qu'est-ce qui doit se passer si la cha ne de caract res appartient en m m e temps la feuil1 et la feuil2 ? Est-ce
possible ? Si oui, la mise en forme conditionnelle est compl ter!
MichD
--------------------------------------------
"elodie005" a crit dans le message de groupe de discussion :
Bonjour tous,
J'ai une nouvelle fois besoin de votre aide, j'esp re que vous pourrez
m'aider...
J'ai un fichier Exel dans lequel j'ai en la feuil 1 dans la colonne A
une liste de mot et en feuil2 galement dans la colonne A une autre
liste de mot (environ 2000 mots).
L'ideal pour moi serait d'avoir une macro qui affiche sur les autres
feuilles du classeur, en vert les cellules qui contiennent (et non pas
strictement identique) un mot de la feuil 1 et en rouge celles qui
contiennent un mot de la feuil 2 (et rien si le mot n'est issu ni de
la liste de la feuil1 ni celui de la feuil2)
Est-ce r alisable? Ou il y a t-il une autre solution plus simple?
Vous remerciant par avance pour votre aide