Bonjour,
J'ai souheterai savoir comment intéger dans une macro la fonction suivante :
- A partir de l'onglet 4, rechercher dans toutes les feuilles du classeur "aaaa" (le mot se trouveras toujours dans la colonne AA)et surligner la ligne d'une couleur (rouge par exemple)
Voici le code que j'ai mais ça ne marche pas :
Dim sh As Worksheet
For Each sh In ThisWorkbook.Worksheets
If Target.Column = 27 _
And Target.Row >= 2 Then
If UCase(Target.Value) = "aaaa" Then
Target.EntireRow.Interior.ColorIndex = 3
Else
Target.EntireRow.Interior.ColorIndex = 0
End If
Merci d'avance,
Cdt,
Gabo29
J'ai souheterai savoir comment intéger dans une macro la fonction suivante :
- A partir de l'onglet 4, rechercher dans toutes les feuilles du classeur "aaaa" (le mot se trouveras toujours dans la colonne AA)et surligner la ligne d'une couleur (rouge par exemple)
Voici le code que j'ai mais ça ne marche pas :
Dim sh As Worksheet
For Each sh In ThisWorkbook.Worksheets
If Target.Column = 27 _
And Target.Row >= 2 Then
If UCase(Target.Value) = "aaaa" Then
Target.EntireRow.Interior.ColorIndex = 3
Else
Target.EntireRow.Interior.ColorIndex = 0
End If
Merci d'avance,
Cdt,
Gabo29
Dernière édition: