Mise en forme partie de texte
Résolu/Fermé
sanchis81
Messages postés
134
Date d'inscription
mardi 17 février 2009
Statut
Membre
Dernière intervention
2 octobre 2013
-
23 mai 2009 à 10:35
sanchis81 Messages postés 134 Date d'inscription mardi 17 février 2009 Statut Membre Dernière intervention 2 octobre 2013 - 25 mai 2009 à 14:37
sanchis81 Messages postés 134 Date d'inscription mardi 17 février 2009 Statut Membre Dernière intervention 2 octobre 2013 - 25 mai 2009 à 14:37
A voir également:
- Mise en forme partie de texte
- Mise en forme conditionnelle excel - Guide
- Mise en forme tableau word - Guide
- Transcription audio en texte word gratuit - Guide
- Mise en forme whatsapp - Guide
- Mise a jour chrome - Accueil - Applications & Logiciels
7 réponses
smartway14
Messages postés
822
Date d'inscription
mercredi 15 octobre 2008
Statut
Membre
Dernière intervention
8 octobre 2011
185
23 mai 2009 à 10:57
23 mai 2009 à 10:57
bonjour;
utulisez les macros
utulisez les macros
sanchis81
Messages postés
134
Date d'inscription
mardi 17 février 2009
Statut
Membre
Dernière intervention
2 octobre 2013
10
23 mai 2009 à 11:11
23 mai 2009 à 11:11
C'est à dire.....
Raymond PENTIER
Messages postés
58793
Date d'inscription
lundi 13 août 2007
Statut
Contributeur
Dernière intervention
3 janvier 2025
17 262
24 mai 2009 à 06:38
24 mai 2009 à 06:38
Ta question n'est pas précise :
Tu veux pouvoir souligner manuellement, ou tu voudrais que ça se fasse automatiquement ?
Dans ce dernier cas il faudrait effectivement écrire une macro à l'aide du langage de programmation VBA ...
Tu veux pouvoir souligner manuellement, ou tu voudrais que ça se fasse automatiquement ?
Dans ce dernier cas il faudrait effectivement écrire une macro à l'aide du langage de programmation VBA ...
michel_m
Messages postés
16603
Date d'inscription
lundi 12 septembre 2005
Statut
Contributeur
Dernière intervention
16 décembre 2023
3 310
24 mai 2009 à 10:38
24 mai 2009 à 10:38
Bonjour
Coucou Sanchis, y'avait longtemps, pas vrai ?
Cette macro te met en rouge gras le texte écrit en A1 (à adapter): tu sélectionne la zone où tu veux traiter (elle peut être discontinue) et tu lances la macro (outils-macros-macros)
Coucou Sanchis, y'avait longtemps, pas vrai ?
Cette macro te met en rouge gras le texte écrit en A1 (à adapter): tu sélectionne la zone où tu veux traiter (elle peut être discontinue) et tu lances la macro (outils-macros-macros)
Sub colorier_mot()
Dim cellule As Range
Dim mot As String
Dim nbre As Byte, cptr As Byte, debut As Byte
mot = Range("A1")
nbre = Len(mot)
Application.ScreenUpdating = False
For Each cellule In Selection
debut = InStr(cellule, mot)
If debut > 0 Then
With cellule.Characters(debut, nbre).Font
.ColorIndex = 3
.Bold = True
End With
End If
Next
End Sub
sanchis81
Messages postés
134
Date d'inscription
mardi 17 février 2009
Statut
Membre
Dernière intervention
2 octobre 2013
10
25 mai 2009 à 11:37
25 mai 2009 à 11:37
Rebonjour Michel,
j'avais fait des essais sur certaines cellules où j'avais inséré du texte et ça marche parfaitement.
Par contre si le contenu de la cellule est le résultat d'une fonction (ici CONCATENER A1 et B1), la macro souligne l'ensemble du texte et non plus les mots recherchés.
Aurais-tu une solution?
Merci michel
j'avais fait des essais sur certaines cellules où j'avais inséré du texte et ça marche parfaitement.
Par contre si le contenu de la cellule est le résultat d'une fonction (ici CONCATENER A1 et B1), la macro souligne l'ensemble du texte et non plus les mots recherchés.
Aurais-tu une solution?
Merci michel
michel_m
Messages postés
16603
Date d'inscription
lundi 12 septembre 2005
Statut
Contributeur
Dernière intervention
16 décembre 2023
3 310
>
sanchis81
Messages postés
134
Date d'inscription
mardi 17 février 2009
Statut
Membre
Dernière intervention
2 octobre 2013
25 mai 2009 à 14:24
25 mai 2009 à 14:24
bonjour
ben, après plusieurs expés j'vois pas
désolé
ben, après plusieurs expés j'vois pas
désolé
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
michel_m
Messages postés
16603
Date d'inscription
lundi 12 septembre 2005
Statut
Contributeur
Dernière intervention
16 décembre 2023
3 310
24 mai 2009 à 10:48
24 mai 2009 à 10:48
Re,
Comme c'était à peu près le m^me problème que Flo ce matin qui demandait en Rouge gras, j'ai pompé sans me souvenir que tu voulais souligner
cellule.Characters(debut, nbre).Font.Underline = xlUnderlineStyleSingle
remplace
With cellule.Characters(debut, nbre).Font
.ColorIndex = 3
.Bold = True
End With
Comme c'était à peu près le m^me problème que Flo ce matin qui demandait en Rouge gras, j'ai pompé sans me souvenir que tu voulais souligner
cellule.Characters(debut, nbre).Font.Underline = xlUnderlineStyleSingle
remplace
With cellule.Characters(debut, nbre).Font
.ColorIndex = 3
.Bold = True
End With
sanchis81
Messages postés
134
Date d'inscription
mardi 17 février 2009
Statut
Membre
Dernière intervention
2 octobre 2013
10
25 mai 2009 à 10:27
25 mai 2009 à 10:27
Merci Michel! c'est exactement ce que je voulais!
c'est vrai que ça faisait longtemps ....
c'est vrai que ça faisait longtemps ....
sanchis81
Messages postés
134
Date d'inscription
mardi 17 février 2009
Statut
Membre
Dernière intervention
2 octobre 2013
10
25 mai 2009 à 14:37
25 mai 2009 à 14:37
Merci quand même!
