VBA : Inserer aller a la ligne dans Word

Résolu/Fermé
bobo8388 - 29 mars 2011 à 09:48
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 - 29 mars 2011 à 12:44
Bonjour,


Je recherche un code VBA me permettant d'inserer un aller a la ligne avant chaque texte ayant une trame de fond. (Ce sont des titres qui ont des trames de fonds de differentes couleurs.)

Savez-vous ci cela est possible?

Merci

2 réponses

Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 775
29 mars 2011 à 10:30
Bonjour,

C'est possible, mais pourquoi ne pas simplement augmenter l'espace avant le paragraphe (par exemple, en utilisant un style) ?
0
Pourquoi pas mais pas certain que cela soit la meilleur méthode.
Voici plus d'information, cela vous aidera surement car toute idee est la bien venue.

J'ai un document word (Texte, Tableau, Image) que je dois convertir pour le rendre lisible sur Blackberry. Cela en un seul click (en effet les utilisateurs ont besoin de quelque chose de rapide et tres simpe en manipulation).
Pour cela je convertis les tableaux en texte/ supprime les image/ converti certain carractére...tout cela avec un code VBA
Seulement apres cela mais tableaux converti qui ont chacun un titre se retrouve collés et ce n'est donc plus lisible.

D'ou ma question sur un code VBA permettant des les espacer.
Une Idée?

Merci beaucoup
0
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 775
29 mars 2011 à 11:21
Les styles de Word sont conçus pour ça.
Leur utilisation en VBA est relativement simple :

Selection.Style = ActiveDocument.Styles("Titre tableau")
0
ok merci,

comment s'écrirais donc le code pour remplacer les styles existant par d'autres?

Merci
0
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 775
Modifié par Patrice33740 le 29/03/2011 à 11:43
D'abord tu crées (manuellement) un modèle (ou un document) de référence qui contient le(s) style(s) dont tu as besoin.
Il suffit ensuite, avec VBA, de copier ce(s) style(s) vers le document sur lequel tu travailles :

Application.OrganizerCopy Source:=NomCompletModèleStyles, Destination:= _ 
    NomCompletDocCible, Name:=NomDuStyle, Object:=wdOrganizerObjectStyles 

Cordialement
Patrice
0
merci pour tout je devrais m'en sortir
0
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 775
29 mars 2011 à 12:44
De rien, bon courage et au plaisir de te relire sur le forum
0