Rechercher : dans
Par :

Macro Word remplacer retour chariot

Dernière réponse le 23 fév 2009 à 20:15:39 Galagrenat, le 23 fév 2009 à 19:48:55 
 Signaler ce message aux modérateurs

Bonjour,

J'ai un fichier en Word rerprennant les données suivantes

B1647
TM012345
F654321

Etc ...
Chaque donnée est terminée par un retour chariot.
Le nombre de caractères des données est variable.

J'aimerais beaucoup avoir une macro qui donne ceci avec les données :
B1647;TM012345;F654321 etc ...

Donc chaque retour chariot doit être remplacé par un point-virgule et les données doivent être accolées l'une à l'autre.

Etant débutant dans le domaine, merci de bien vouloir écrire la macro complète.

Merci d'avance pour votre intervention.
Cordialement,

Galagrenat

Meilleures réponses pour « Macro Word remplacer retour chariot » dans :
Protéger vos documents Word contre les macrovirus VoirQu'est-ce qu'un virus macros (ou macrovirus) ? Quels sont les symptômes d'une infection par un virus macros ? Quelles en sont les conséquences ? Comment s'en protéger ? Première solution Deuxième solution Troisième solution Quatrième...
VBScript - Les constantes VoirQu'est-ce qu'une constante ? Une constante est un nom, facilement mémorisable, remplaçant une valeur (nombre, chaîne, etc.) qui ne change pas. L'objectif d'une constante est d'une part de permettre de rendre un programme plus lisible, d'autre part...

1

 Galagrenat, le 23 fév 2009 à 20:15:39
  • +1

Bon, j'ai un début de piste

Sub Macro1()
'
' Macro1 Macro
'
Selection.EndKey Unit:=wdLine
Selection.Delete Unit:=wdCharacter, Count:=1
Selection.TypeText Text:=";"

End Sub

Mais comment faire pour qu'il parcoure tout le document et s'arrête à la fin ?

Répondre à Galagrenat
Collection CommentÇaMarche.net