OVH Cloud OVH Cloud

Macro rechercher et supprimer

24 réponses
Avatar
Philippe Meresse
Bonsoir à toutes et tous,
je cherche à faire une macro du style:
Si dans un texte, une ligne commence par 2 GIVN alors suppression de la
totalité de la ligne.
Merci pour votre aide
Philippe

10 réponses

1 2 3
Avatar
Philippe Meresse
Bonsoir, (Word 2000)
Dans un texte comportant plusieurs milliers de lignes se terminant par une
marque de paragraphe (^p) je cherche le moyen de supprimer rapidement les
lignes vides.
Merci,
Philippe Meresse
Avatar
Geo
Bonjour Philippe Meresse


Bonsoir, (Word 2000)
Dans un texte comportant plusieurs milliers de lignes se terminant
par une marque de paragraphe (^p) je cherche le moyen de supprimer
rapidement les lignes vides.


remplacer ^p^p par ^p autant de fois que nécessaire

S'il y a des séquences importantes on peut aller plus vite en commençant
par (par exemple)
remplacer ^p^p^p^p^p par ^p


--

A+

Avatar
Anacoluthe
Bonjour !

'Geo' nous a écrit ...
remplacer ^p^p par ^p autant de fois que nécessaire
S'il y a des séquences importantes on peut aller plus vite en commençant
par (par exemple)
remplacer ^p^p^p^p^p par ^p


À peine plus compliqué mais en une seule passe RR :
remplacer toute suite d’au moins 2 sauts de § par un seul :
- Caractères génériques
- Rechercher: ^013{2;}
- Remplacer par: ^013

Anacoluthe
« La vie intérieure seule peut remplacer toutes les chimères. »
- Charles-Maurice de TALLEYRAND

Avatar
Philippe Meresse
Merci à Geo et Anacoluthe pour leurs conseils avisés
@+
Philippe Meresse
Avatar
Philippe Meresse
Bonsoir,
Ben le problème n'est pas résolu ;-(
en effet cela à pour effet de me trouver tout les ^p mais moi je ne veux
uniquement supprimer que les lignes vides qui si je ne me trompe pas sont
constituées d'un seul ^p sans rien devant.
ex:
Toto

Titi
Je ne veux supprimer que la ligne entre Toto et Titi

Merci,
Philippe



- Caractères génériques
- Rechercher: ^013{2;}
- Remplacer par: ^013

Anacoluthe
« La vie intérieure seule peut remplacer toutes les chimères. »
- Charles-Maurice de TALLEYRAND


Avatar
Anacoluthe
Bonjour !

'Philippe Meresse' nous a écrit ...
Ben le problème n'est pas résolu ;-(
en effet cela à pour effet de me trouver tout les ^p mais moi je ne veux
uniquement supprimer que les lignes vides qui si je ne me trompe pas sont
constituées d'un seul ^p sans rien devant.


Vous ne suivez pas :-( Affichez les marques avec le bouton ¶
Vos lignes vides sont bien des ¶ non ?
Si vous remplacez toute occurence ¶¶ ou plus par un seul ¶
vous supprimez les lignes vides. Veuillez ré-essayer svp

Anacoluthe
« La vie intérieure seule peut remplacer toutes les chimères. »
- Charles-Maurice de TALLEYRAND

Avatar
Philippe Meresse
Bonjour,

Je cherche à remplacer par rien (dans un fichier de 64 pages) les lignes en
anglais dans un texte formaté comme en dessous.

j'ai pensé rechercher (plusiuers fois de suite) à partir des mots anglais
les plus utilisés comme cela: ^13*<King*>*^13 et remplacer par ^13 mais cela
me sélectione pour suppréssion des pavés entier ??? Je dois me tromper
quelque part!



2 PEPIN le Bref c. 714/15 c. 743/44 ../09/0768

Jupille Saint-Denis

Maire du Palais, Roi de Neustrie et

Roi des francs
(741-768)

Mayor of the Palace, King of Neustrie and

Franks' King (741-768)



Merci pour votre aide

Philippe
Avatar
Geo

Je cherche à remplacer par rien (dans un fichier de 64 pages) les lignes en anglais
dans un texte formaté comme en dessous.

j'ai pensé rechercher (plusiuers fois de suite) à partir des mots anglais les plus
utilisés comme cela: ^13*<King*>*^13 et remplacer par ^13 mais cela me sélectione pour
suppréssion des pavés entier ??? Je dois me tromper quelque part!


Il faudrait vérifier si ce sont bien des fins de paragraphe et non de
ligne.
Dans Outils Options Affichage, cocher les marques de paragraphes.
Et là on peut voir le signe à la fin de chaque ligne.

--
A+

Avatar
Philippe Meresse
Je confirme Geo ce sont bien des fin de paragraphe.
j'avais fait la manip que tu cite.
Merci

"Geo" a écrit dans le message de news:


Je cherche à remplacer par rien (dans un fichier de 64 pages) les lignes
en anglais dans un texte formaté comme en dessous.

j'ai pensé rechercher (plusiuers fois de suite) à partir des mots anglais
les plus utilisés comme cela: ^13*<King*>*^13 et remplacer par ^13 mais
cela me sélectione pour suppréssion des pavés entier ??? Je dois me
tromper quelque part!


Il faudrait vérifier si ce sont bien des fins de paragraphe et non de
ligne.
Dans Outils Options Affichage, cocher les marques de paragraphes.
Et là on peut voir le signe à la fin de chaque ligne.

--
A+





Avatar
Doug Robbins - Word MVP
Use the following macro

Selection.HomeKey wdStory
Selection.Find.ClearFormatting
With Selection.Find
Do While .Execute(FindText:="King", MatchWildcards:úlse,
Wrap:=wdFindContinue, Forward:=True) = True
Selection.Paragraphs(1).Range.Delete
Loop
End With


--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP

"Philippe Meresse" wrote in message
news:43c0e662$0$20170$
Bonjour,

Je cherche à remplacer par rien (dans un fichier de 64 pages) les lignes
en anglais dans un texte formaté comme en dessous.

j'ai pensé rechercher (plusiuers fois de suite) à partir des mots anglais
les plus utilisés comme cela: ^13*<King*>*^13 et remplacer par ^13 mais
cela me sélectione pour suppréssion des pavés entier ??? Je dois me
tromper quelque part!



2 PEPIN le Bref c. 714/15 c. 743/44 ../09/0768

Jupille Saint-Denis

Maire du Palais, Roi de Neustrie et

Roi des francs
(741-768)

Mayor of the Palace, King of Neustrie and

Franks' King
(741-768)



Merci pour votre aide

Philippe




1 2 3