VBA EXCEL_ recherche mot
Résolu
Sansandrine
Messages postés
94
Statut
Membre
-
Sansandrine Messages postés 94 Statut Membre -
Sansandrine Messages postés 94 Statut Membre -
Bonjour,
J'aimerais griser une partie de ma feuille quand ma cellule b2 contient le mot "rdc" mais le truc c'est que cette cellule b2 peut très bien contenir rdc haut et rdc bas et pleins d'autres phrase avec rdc.
Et il faut que ça soit griser pour tous ces cas de figure.
Je cherche donc une formule VBA qui serait en gros : quand ma cellule contient "rdc" ...
Voici le code que j'ai pour l'instant (mais ça ne me grise pas quand j'ai rdc haut par exemple)
Sub griser()
Range("b4:d5").Select
If Range("b2").Value <> "rdc" Then
Selection.Interior.Pattern = xlSolid
Selection.Interior.ColorIndex = xlNone
Else
Selection.Interior.Pattern = xlUp
End If
End Sub
Aussi ou devrais-je mettre ce code pour qu'il soit automatique sur ma feuille ?
Merci d'avance
J'aimerais griser une partie de ma feuille quand ma cellule b2 contient le mot "rdc" mais le truc c'est que cette cellule b2 peut très bien contenir rdc haut et rdc bas et pleins d'autres phrase avec rdc.
Et il faut que ça soit griser pour tous ces cas de figure.
Je cherche donc une formule VBA qui serait en gros : quand ma cellule contient "rdc" ...
Voici le code que j'ai pour l'instant (mais ça ne me grise pas quand j'ai rdc haut par exemple)
Sub griser()
Range("b4:d5").Select
If Range("b2").Value <> "rdc" Then
Selection.Interior.Pattern = xlSolid
Selection.Interior.ColorIndex = xlNone
Else
Selection.Interior.Pattern = xlUp
End If
End Sub
Aussi ou devrais-je mettre ce code pour qu'il soit automatique sur ma feuille ?
Merci d'avance
A voir également:
- VBA EXCEL_ recherche mot
- Trousseau mot de passe iphone - Guide
- Mot de passe - Guide
- Recherche automatique des chaînes ne fonctionne pas - Guide
- Mot de passe administrateur - Guide
- Mot de passe bios perdu - Guide
Par contre j'ai un autre soucis, c'est qu'il ne veut plus me sélectionner autre chose que range b4:d5 quand je suis sur la feuille. Comment effacer ma selection une fois grisée, mais de façon à ce que lorsque je change la valeur de ma case b2 ça change automatiquement ma partie grisée.
j'ai essayé avec selection.end mais ça marche pas