Re : Excel et PDF
Bonjour à Tous,
Effectivement il faut valider l'enregistrement.
Il existe 1 option dans Pdf Creator : c'est l'enregistrement automatique qui ne demande plus de validation, il enregistre systématiquement le fichier pdf dans 1 répertoire (défini en cochant l'option automatique).
Il ne reste plus qu'à attentre 1 à 3 secondes le temps que le fichier soit totalement "imprimé" pour le copier et le coller dans le répertoire souhaité.
Voici 1 exemple de macro que j'utilise :
Sub Imp_Adobe()
'Détermine le port variable de l'imprimante
For P = 0 To 9
Imprimante_Port = "PDFCreator sur Ne0" & P & ":"
On Error Resume Next
Application.ActivePrinter = Imprimante_Port
If ActivePrinter = Imprimante_Port Then Exit For
Next P
Application.ActivePrinter = Imprimante_Port
AppActivate "Microsoft Excel" ' Active Microsoft Excel
Windows(Nom_Fichier_XL).Activate
Sheets(Array("Garde", "M1", "M2", "M4", "M5", "P", "C", "T")).Select
Sheets("Garde").Activate
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Fin:
For Temps = 1 To 300000000
Attente = Temps
Next Temps
Chemin_Pdf = "E:\Datas\exemples\"
Nom_Pdf = "Exemple.pdf"
Chemin_Complet = Chemin_Pdf & Nom_Pdf
FileCopy "E:\PdfCreatorTemp.pdf", Chemin_Complet
End Sub
En espérant avoir été utile. Bye bye
Johann.