Tester les 3 premières lettres
Résolu
duduleray
-
duduleray -
duduleray -
Bonjour a tous, forum
Voila j'ai en colonne (A) une liste de mot et chiffres comprenant aussi des espaces
disposer de cette façon et couvrant la zone (A2:A32)
Matin Soir 2012
Journée Matin 2012
Matin Après Midi 2012
Matin Soir 2012
ect etc
Je souhaiterai svp un petit code VBA pour tester les 3 premières lettres (Mat) pour coloriser les cellules en face en jaune, ceci afin de repérage plus facile
SVP pas de MFD merci
Exemple: si A2 ="Mat" then on colore zone A2:A6
et ainsi de suite chaque fois qu'une cellule de la colonne comporte "Mat"
Merci a vous et de votre temps
Bonne soirée a tous
Duduleray
Voila j'ai en colonne (A) une liste de mot et chiffres comprenant aussi des espaces
disposer de cette façon et couvrant la zone (A2:A32)
Matin Soir 2012
Journée Matin 2012
Matin Après Midi 2012
Matin Soir 2012
ect etc
Je souhaiterai svp un petit code VBA pour tester les 3 premières lettres (Mat) pour coloriser les cellules en face en jaune, ceci afin de repérage plus facile
SVP pas de MFD merci
Exemple: si A2 ="Mat" then on colore zone A2:A6
et ainsi de suite chaque fois qu'une cellule de la colonne comporte "Mat"
Merci a vous et de votre temps
Bonne soirée a tous
Duduleray
A voir également:
- Formule excel 2 premières lettres du 2eme mot
- Formule si et excel - Guide
- Formule moyenne excel plusieurs colonnes - Guide
- Formule somme excel colonne - Guide
- Excel mise en forme conditionnelle formule - Guide
- Liste déroulante excel - Guide
Effectivement en fait il faut tester juste le début de la phrase c'est a dire uniquement les trois premières lettres
Merci de la réponse
je vous souhaite une bonne soirée
Raymond
Je souhaiterai svp un petit code VBA pour tester les 3 premières lettres (Mat) pour coloriser les cellules en face en jaune, ceci afin de repérage plus facile
cellules en face en jaune, et Exemple: si A2 ="Mat" then on colore zone A2:A6
Pas la meme chose
A+
Décidément je ne fait que des co.....
excuse moi on va mettre ça sur le manque de soleil (LOL)
Donc >>> cellules en face en jaune, Exemple:
si dans la colonne a partir de (A2) on trouve ="Mat" then on colore la ligne correspondante
zone A:E
Merçi de ta réponse, bonne journée
A plus tard
ouvrir VBA
ouvir page code de la feuille par double click
code a copier
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Application.Intersect(Target, Range("A2:A32")) Is Nothing Then
Set Col_C = Range("A2:A32")
For Each Cellule In Col_C
If Left(Cellule, 3) = "Mat" Then
Range(Cells(Cellule.Row, 2), Cells(Cellule.Row, 5)).Interior.Color = 65535
Else
Range(Cells(Cellule.Row, 2), Cells(Cellule.Row, 5)).Interior.Pattern = xlNone
End If
Next Cellule
End If
End Sub
Cela devrait aller
Bonne suite
Merci de ta réponse et pour le code
ça fonctionne très bien comme je le souhaitai
je te remercie pour ton aide et ton savoir
Un bon W-end
Cordialement Raymond