Excel 2016 : Numéro FD à incrémenter

[kdet]

Bonjour le Forum, à tous et à toutes,

De retour parmi vous pour trouver de l'aide.

 

[job75]

chemin = "I:\Google Drive\KANDRA\2019\FD PDF\" 'à adapter

 

[kdet]

Désolé de te déranger Job75 mais rien ne se passe. je vérifie le dossier FD PDF après impression mais le dossier est toujours vide. je ne sais pas où est le problème.

kdet

 

[job75]

Désolé de te déranger Job75 mais rien ne se passe.

Normalement si l'enregistrement au format PDF échoue il doit y avoir un message d'erreur.

Pour vérifier que le chemin d'accès existe ajoutez une MsgBox :

chemin = "I:\Google Drive\KANDRA\2019\FD PDF\" 'à adapter
MsgBox "Le chemin indiqué " & IIf(Dir(chemin, vbDirectory) = "", "n'existe pas", "existe")

Quel message s'affiche ?

 

[kdet]

Re,

Aucun message n'apparaît. Est-ce ma version d'excel 2016 qui pose problème ? je joint mon fichier.

kdet

 

[job75]

Aucun message n'apparaît. Est-ce ma version d'excel 2016 qui pose problème ?

Je ne sais pas car chez moi (Excel 2013) le message s'affiche.

S'il ne s'affiche pas c'est que la macro ne s'exécute pas, alors il ne devrait pas y avoir d'incrémentation en D2, est-ce le cas ?

 

[kdet]

oui c'est bien cela. je viens de le vérifier après impression.

kdet

 

[job75]

Ce qui a dû se passer chez vous c'est que les évènements ont été désactivés et donc la macro Workbook_BeforePrint ne s'exécute pas.

Exécutez cette macro pour réactiver les évènements :

Sub ActiveEvenements()
Application.EnableEvents = True 'réactive les évènements
End Sub

 

[kdet]

Job75, j'ai trouvé où était le problème. j'ai replacé le code :
"Cancel = True 'pour tester sans imprimer, à supprimer pour imprimer"
je l'ai supprimé pour pouvoir imprimé. et si je laisse ce code là donc je ne peux pas imprimer sauf l'enregistré sous .pdf. comment avoir l'impression et le pdf en même temps.

cordialement,

kdet

 

[kdet]

J'ai trouvé Job75. "Cancel = False"

j'apprends petit à petit grâce à vous.

Merci le forum, Job75

kdet

 

[kdet]

Re bonjour le forum, Job75,

Je reviens vers vous car il y a un petit soucis. en D2 le numero FD est : 201903/FNR145. Lors de l'impression et de l'archivage, le numéro doit toujours être le même. or là ce n'est pas le cas car le numéro dans l'impression et de l'archivage en pdf est : 201903/FNR146 alors que ça devrait être 201903/FNR145 d'abord et une fois archiver en pdf le numéro change en 201903/FNR146.

est-vous pouvez m'aider?

Merci

kdet

 

[job75]

Pour l'impression et l'archivage le numéro utilisé est le numéro après incrémentation, un point c'est tout.

 

[kdet]

Merci job75,

kdet