Je souhaiterais automatiser une opération de remplacement dans une série de
document en fonction du format des caractères (présence de gras ou pas)
J'ai d'abord effectuer cette opération à la main en enregistrant la macro et
en cliquant sur "Remplacer tout" et j'ai fait qq modif pour que ça marche.
Par contre, je ne parviens pas à récupérer le texte des occurrences, c'est à
dire les mots et expressions de mon texte qui sont en gras.
Un petit exemple pour être plus clair : supposons que dans mon doc, il y ait
2 phrases en gras. La première c'est "Il fait beau" et la seconde c'est "le
soleil brille".
Comment faire pour que VBA me récupère les strings "Il fait beau" et "le
soleil brille" pour les stocker dans un tableau ou les afficher dans une
msgbox par ex ?
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
Geo
Bonjour Julien
Bonjour,
Je souhaiterais automatiser une opération de remplacement dans une série de document en fonction du format des caractères (présence de gras ou pas)
J'ai d'abord effectuer cette opération à la main en enregistrant la macro et en cliquant sur "Remplacer tout" et j'ai fait qq modif pour que ça marche. Par contre, je ne parviens pas à récupérer le texte des occurrences, c'est à dire les mots et expressions de mon texte qui sont en gras.
Un petit exemple pour être plus clair : supposons que dans mon doc, il y ait 2 phrases en gras. La première c'est "Il fait beau" et la seconde c'est "le soleil brille".
Comment faire pour que VBA me récupère les strings "Il fait beau" et "le soleil brille" pour les stocker dans un tableau ou les afficher dans une msgbox par ex ?
Là on n'est plus dans une solution de replacement, ou alors j'ai pas vu le lien. Pour savoir si du texte sélectionné est en gras : Selection.Font.Bold = True Dans ton cas on peut tester chaque caractère et si la condition est remplie le recopier dans une variable texte. Pour la recherche édition / rechercher / plus / Police et sélectionner gras --
A+
Bonjour Julien
Bonjour,
Je souhaiterais automatiser une opération de remplacement dans une
série de document en fonction du format des caractères (présence de
gras ou pas)
J'ai d'abord effectuer cette opération à la main en enregistrant la
macro et en cliquant sur "Remplacer tout" et j'ai fait qq modif pour
que ça marche. Par contre, je ne parviens pas à récupérer le texte
des occurrences, c'est à dire les mots et expressions de mon texte
qui sont en gras.
Un petit exemple pour être plus clair : supposons que dans mon doc,
il y ait 2 phrases en gras. La première c'est "Il fait beau" et la
seconde c'est "le soleil brille".
Comment faire pour que VBA me récupère les strings "Il fait beau" et
"le soleil brille" pour les stocker dans un tableau ou les afficher
dans une msgbox par ex ?
Là on n'est plus dans une solution de replacement, ou alors j'ai pas
vu le lien.
Pour savoir si du texte sélectionné est en gras : Selection.Font.Bold
= True
Dans ton cas on peut tester chaque caractère et si la condition est
remplie le recopier dans une variable texte.
Pour la recherche
édition / rechercher / plus / Police
et sélectionner gras
--
Je souhaiterais automatiser une opération de remplacement dans une série de document en fonction du format des caractères (présence de gras ou pas)
J'ai d'abord effectuer cette opération à la main en enregistrant la macro et en cliquant sur "Remplacer tout" et j'ai fait qq modif pour que ça marche. Par contre, je ne parviens pas à récupérer le texte des occurrences, c'est à dire les mots et expressions de mon texte qui sont en gras.
Un petit exemple pour être plus clair : supposons que dans mon doc, il y ait 2 phrases en gras. La première c'est "Il fait beau" et la seconde c'est "le soleil brille".
Comment faire pour que VBA me récupère les strings "Il fait beau" et "le soleil brille" pour les stocker dans un tableau ou les afficher dans une msgbox par ex ?
Là on n'est plus dans une solution de replacement, ou alors j'ai pas vu le lien. Pour savoir si du texte sélectionné est en gras : Selection.Font.Bold = True Dans ton cas on peut tester chaque caractère et si la condition est remplie le recopier dans une variable texte. Pour la recherche édition / rechercher / plus / Police et sélectionner gras --
