|
|
Thread Tools | Display Modes |
#1
|
|||
|
|||
Macro to create sequencial versions from a word doc to sequencial pdf files.
Hi all,
My name is Filipe and I´m a new member on this forum. Following the guidelines for creating macros in a word document, I was able to create a macro that registers the changes made to a pdf document: Code:
Sub A2() ' ' A2 Macro ' Record PDF (Utente MFJ) ' ActiveDocument.ExportAsFixedFormat OutputFileName:= _ "\\servidor\qsspublic\enfermagem\PISO A\A2 - MFJ\Diario Clinico\Registos\PDFs 2018\Rec 01.12.2018 .pdf" _ , ExportFormat:=wdExportFormatPDF, OpenAfterExport:=True, OptimizeFor:= _ wdExportOptimizeForOnScreen, Range:=wdExportAllDocument, From:=1, To:=1, _ Item:=wdExportDocumentContent, IncludeDocProps:=True, KeepIRM:=True, _ CreateBookmarks:=wdExportCreateNoBookmarks, DocStructureTags:=True, _ BitmapMissingFonts:=True, UseISO19005_1:=False ChangeFileOpenDirectory _ "\\servidor\qsspublic\enfermagem\PISO A\A2 - MFJ\Diario Clinico\Registos\PDFs 2018\" End Sub What code should I add or change in my example to get this result? Very grateful for the help, I have tried to find a solution on the web, but without success. Best regards, Filipe |
#2
|
||||
|
||||
Try:
Code:
Sub A2() ActiveDocument.ExportAsFixedFormat OutputFileName:= _ "\\servidor\qsspublic\enfermagem\PISO A\A2 - MFJ\Diario Clinico\Registos\PDFs 2018\Rec" & _ Format(Now, "DD.MM.YYYY") & ".pdf", _ ExportFormat:=wdExportFormatPDF, OpenAfterExport:=True, _ OptimizeFor:=wdExportOptimizeForOnScreen, Range:=wdExportAllDocument, _ From:=1, To:=1, Item:=wdExportDocumentContent, IncludeDocProps:=True, _ KeepIRM:=True, CreateBookmarks:=wdExportCreateNoBookmarks, _ DocStructureTags:=True, BitmapMissingFonts:=True, UseISO19005_1:=False End Sub Code:
Sub A2() ActiveDocument.SaveAs2 FileName:= _ "\\servidor\qsspublic\enfermagem\PISO A\A2 - MFJ\Diario Clinico\Registos\PDFs 2018\Rec" & _ Format(Now, "DD.MM.YYYY") & ".pdf", FileFormat:=wdFormatPDF, AddToRecentFiles:=False End Sub
__________________
Cheers, Paul Edstein [Fmr MS MVP - Word] |
Tags |
word doc to pdf |
|
Similar Threads | ||||
Thread | Thread Starter | Forum | Replies | Last Post |
Batch create word files with link to changing excel | hannes.ledegen | Mail Merge | 8 | 04-07-2016 01:22 AM |
How to create a MS word file that automatically logs something specific inside other WORD files? | meys | Word VBA | 1 | 01-04-2015 05:22 AM |
Global macro across a number of different word files | daffy | Word VBA | 6 | 07-08-2014 05:42 PM |
sequencial numbering keeps breaking | tpen3219 | Word | 4 | 12-05-2012 07:45 PM |
Merging word files from excel macro | hklein | Excel Programming | 0 | 08-05-2011 02:27 AM |