start:=15 non ?
quel est l'intérêt de vouloir faire ça en une ligne ?
Bonsoir gosselien
Aucun intérêt.
C'est l'autre problème que je veux résoudre si c'est possible.
Supprimer le surlignage
Entre Charges et 2019.
Par Vba sinon manuel.
Voir fichier TOTO.xls
Réponse par téléphone alors si faute toutes mes excuses.
Cordialement
With .Range("A1")
.Characters(Start:=14, Length:=5).Font.ColorIndex = 3
.Characters(Start:=14, Length:=1).Font.ColorIndex = 15 'Pour qu'entre Charges et 2019 ne soit pas souligné mettre la mëme couleur que le fond soit 15
End With
Bonne fin de WE à tous
Cordialement