Manipuler le nom du fichier de sortie PDF avec l' OnMacrosApplied Event Handler / Imprimante PDF
Cet exemple montre comment manipuler le nom de fichier du fichier de sortie PDF de l'imprimante lorsque l'événement OnMacrosApplied
se produit. L'exemple de macro n'a pas été créé pour faire quelque chose d'utile. Il lira le nom du fichier de sortie et l'inversera :-)
Rem -- Rem -- Run this function when the macros are applied. Rem -- Sub OnMacrosApplied Dim fso, output, filename, extension, foldername Rem -- Create a file system object for file path helper functions Set fso = CreateObject("Scripting.FilesystemObject") Rem -- Get the current output value output = context("Config")("output") Rem -- Get the file path parts filename = fso.GetBaseName(output) foldername = fso.GetParentFolderName(output) extension = fso.GetExtensionName(output) Rem -- Reverse the file name filename = StrReverse(filename) Rem -- Assemble the file path again output = foldername & "\" & filename & "." & extension Rem -- Set the new file path in the output context("Config")("output") = output Rem -- Make sure the configuration isn't reloaded because of an option set selection. context("Config")("rememberlastoptionset") = "no" Rem -- Clean up Set fso = Nothing End Sub
Vous pouvez télécharger et exécuter l'exemple vous-même. Les fichiers requis sont disponibles ici. Le fichier VBS doit se trouver dans le sous-dossier macros
de macros
installation d'imprimante PDF. Vous pouvez utiliser le paramètre MacroDir pour modifier l'emplacement des fichiers VBS si nécessaire.
Téléchargements
appendice | taille |
---|---|
Télécharger l'exemple de code | 0.6 KB |