VBA Word : supprimer les pages blanches

VBA Word : supprimer les pages blanches - VB/VBA/VBS - Programmation

Marsh Posté le 17-06-2008 à 16:40:19    

Bonjour
 
Après avoir fait une recherche dans les archives, je me lance. J'aurais deux questions :
1) Je compile quotidiennement des documents Word avec une macro. Ces documents contiennent du texte, des tableaux et des images. Souvent, il y a des pages blanches entre les docs ou à la fin du document compilé. Auriez vous une idée d'un code VBA permettant de supprimer automatiquement les pages blanches ?
 
2) Autre problème lié à cette histoire de compilation. Le document maitre dans lequel s'insèrent les autres documents Word comprend à la fin un texte juridique. Je souhaiterais que ce texte soit toujours en bas de la dernière page du document (et pas en haut de la dernière page ou à cheval entre l'avant dernière page et la dernière page). Avez vous des idées ?
 
Merci beaucoup pour votre aide.
 
 

Reply

Marsh Posté le 17-06-2008 à 16:40:19   

Reply

Marsh Posté le 18-06-2008 à 14:59:50    

Pour le 2), utilise les pieds de page avec un champ de condition {IF ... }
Voici un exemple que tu peux mettre dans un document Word vierge pour test (via insertion de champ)

{ IF { PAGE }={ NUMPAGES } "Dernière page" "page quelconque" \* MERGEFORMAT }

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed