CelluleVide
XLDnaute Occasionnel
Bonjour les XLDnautes,
Je voudrais mettre en gras les cellules qui contiennent une date au milieu d'une chaine de texte.
Mon idée de départ est de trouver les "/??/ " Mais je ne sais pas l'ecrire en VBA
Voici le debut de mon code:
Range("B1:B113").Select
Dim Cel As Range
For Each Cel In Selection
If Cel.Value = 'ET C'EST LA QUE JE BLOQUE' Then Cel.Font.Bold = True
Next Cel
Je voudrais mettre en gras les cellules qui contiennent une date au milieu d'une chaine de texte.
Mon idée de départ est de trouver les "/??/ " Mais je ne sais pas l'ecrire en VBA
Voici le debut de mon code:
Range("B1:B113").Select
Dim Cel As Range
For Each Cel In Selection
If Cel.Value = 'ET C'EST LA QUE JE BLOQUE' Then Cel.Font.Bold = True
Next Cel