Détermination de l'état via le gestionnaire d'événements OnAfterPrint / Imprimante PDF
-
Sub OnAfterPrint()
-
Dim filelist
-
-
filelist = ""
-
For Each fn In Context("FileList").items
-
filelist = filelist & fn & vbCrLf
-
Next
-
MsgBox "Your document was created." & vbCrLf & vbCrLf & _
-
Context("OutputFileName") & vbCrLf & vbCrLf & _
-
"It contains " & Context("PageCount") & " pages in " & _
-
Context("FileCount") & " files." & vbCrLf & vbCrLf & _
-
"Output files:" & vbCrLf & filelist
-
End Sub
Télécharger un exemple de fichier
Vous pouvez télécharger l'exemple de code. Après le déballage, veuillez déplacer le fichier de macro VBS qu'il contient dans le dossier macros de l'imprimante PDF (dans le répertoire d'installation). Vous pouvez également définir un répertoire différent avec le paramètre MacroDir .
Téléchargements
appendice | taille |
---|---|
Télécharger l'exemple de code | 458 Bytes |