Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
michdenis
Bonjour,
Une suggestion, tu pourrais modifier la grosseur des caractères du mot ou expression et passer en caractère gras.
Si tu veux appliquer ce qui suit à plusieurs cellules, tu peux appliquer ce qui suit dans une boucle Find ... FindNext . Sur ce thème, tu as un exemple dans l'aide d'Excel.
'----------------------------- Sub test() Dim Mot As String Mot = "besoins" With Range("A1") x = InStr(1, .Text, Mot, vbTextCompare) y = Len(Mot) With .Characters(x, y).Font .Size = 14 .Bold = True End With End With End Sub '-----------------------------
"dumo" a écrit dans le message de groupe de discussion :
Comment surligner en couleur (et non souligner) du texte contenu dans une cellule d'une feuille Excel 2007?
Bonjour,
Une suggestion, tu pourrais modifier la grosseur
des caractères du mot ou expression et passer
en caractère gras.
Si tu veux appliquer ce qui suit à plusieurs cellules,
tu peux appliquer ce qui suit dans une boucle
Find ... FindNext . Sur ce thème, tu as un exemple
dans l'aide d'Excel.
'-----------------------------
Sub test()
Dim Mot As String
Mot = "besoins"
With Range("A1")
x = InStr(1, .Text, Mot, vbTextCompare)
y = Len(Mot)
With .Characters(x, y).Font
.Size = 14
.Bold = True
End With
End With
End Sub
'-----------------------------
"dumo" <dumo@discussions.microsoft.com> a écrit dans le message de groupe de discussion :
139E863A-4656-435C-8293-E446596D6219@microsoft.com...
Comment surligner en couleur (et non souligner) du texte contenu dans une
cellule d'une feuille Excel 2007?
Une suggestion, tu pourrais modifier la grosseur des caractères du mot ou expression et passer en caractère gras.
Si tu veux appliquer ce qui suit à plusieurs cellules, tu peux appliquer ce qui suit dans une boucle Find ... FindNext . Sur ce thème, tu as un exemple dans l'aide d'Excel.
'----------------------------- Sub test() Dim Mot As String Mot = "besoins" With Range("A1") x = InStr(1, .Text, Mot, vbTextCompare) y = Len(Mot) With .Characters(x, y).Font .Size = 14 .Bold = True End With End With End Sub '-----------------------------
"dumo" a écrit dans le message de groupe de discussion :
Comment surligner en couleur (et non souligner) du texte contenu dans une cellule d'une feuille Excel 2007?