Bonjour à tous,
Je suis néophyte en terme de script et language de programmation je viens donc vous exposer mon problème que je rencontre actuellement sur word pour enregistrer mes factures sans avoir à les nommer une par une.
J'ai crée un publipostage avec des données d'un tableau excel vers word (facture)
J'ai ensuite installer pdfcreator ! très utile
Voici le code que j'utilise actuellement (que j'ai préalablement enregistrer directement sur word)
Avec ce bout de code j'enregistre que les 2 premières pages (je copie colle selon le nombre de page que je veux enregistrer... pas pratique..)
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17 Sub test01() ' ' test01 Macro ' ' Application.PrintOut FileName:="", Range:=wdPrintAllDocument, Item:= _ wdPrintDocumentWithMarkup, Copies:=1, Pages:="", PageType:= _ wdPrintAllPages, Collate:=True, Background:=True, PrintToFile:=False, _ PrintZoomColumn:=0, PrintZoomRow:=0, PrintZoomPaperWidth:=0, _ PrintZoomPaperHeight:=0 ActiveDocument.MailMerge.DataSource.ActiveRecord = wdNextRecord Application.PrintOut FileName:="", Range:=wdPrintAllDocument, Item:= _ wdPrintDocumentWithMarkup, Copies:=1, Pages:="", PageType:= _ wdPrintAllPages, Collate:=True, Background:=True, PrintToFile:=False, _ PrintZoomColumn:=0, PrintZoomRow:=0, PrintZoomPaperWidth:=0, _ PrintZoomPaperHeight:=0
Ensuite s'ouvre une fenêtre pour que je choisisse le dossier de destination et le nom du fichier. Vu que c'est des factures le mieux serait d'avoir un script ou je rentre un nombre (ex : 2015001) et que les suivants s'enregistre avec +1 automatiquement, et coïncider avec mes N° de facture)
Au début je voulais directement prendre le Numéro présent sur la facture mais ça doit être encore plus compliqué.. c'est un champs de fusion appeler "nfacture" (colonne excel)
Le plus simple serait je pense un script N+1 pour les factures et peut être optimiser mon code d'enregistrement pour qu'il affecte toutes mes pages sans que j'ai a copier coller le script du dessus selon la quantité de facture que je dois enregistrer.
J'espère que vous comprendrez mon problème.... Ca fait 2 jours que je cherche, que j'essaie, encore et encore mais toujours rien...
Par avance merci
Adrien
Partager