B
britchouleloup
Guest
Bonjour,
Voici mon problème. J'ai créé une petite macro me permettant de retravailler des écritures comptables (trame test). Elle m'ouvre mon fichier paie (enregistré sous c:\salaire\PAIE.xls) en un fichier retravaillé. Ce fichier est automatiquement enregistré en xls avec le nom du mois concerné (sur l'onglet procédure), je voudrais aussi enregister la page des écritures modifiées (onglet trame) en pdf.
J'ai créé cette macro il y a quelques temps. Et elle fonctionnait correctement, depuis mon changement d'ordi elle fonctionne plus pour la partie enregistrement en pdf.😡
Quelqu'un aurait-il une solution à m'apporter?
Les lignes de codes qui merdouillent sont les suivantes (mois = la valeur de la cellule a6)
:
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"C:\Salaire\" & mois & ".pdf", Quality:=xlQualityStandard, IncludeDocProperties:=True _
, IgnorePrintAreas:=False, OpenAfterPublish:=False
Range("F82").Select
(mois = la valeur de la cellule a6)
Pour mieux comprendre je me permets de joindre mes fichiers en exemple.
Aussi est-il possible de créer automatiquement un nouveau message sous outlook avec ce fichier .pdf joint ?
Je vous remercie par avance de l'aide que vous pourriez m'apporter.
Cordialement,
Voici mon problème. J'ai créé une petite macro me permettant de retravailler des écritures comptables (trame test). Elle m'ouvre mon fichier paie (enregistré sous c:\salaire\PAIE.xls) en un fichier retravaillé. Ce fichier est automatiquement enregistré en xls avec le nom du mois concerné (sur l'onglet procédure), je voudrais aussi enregister la page des écritures modifiées (onglet trame) en pdf.
J'ai créé cette macro il y a quelques temps. Et elle fonctionnait correctement, depuis mon changement d'ordi elle fonctionne plus pour la partie enregistrement en pdf.😡
Quelqu'un aurait-il une solution à m'apporter?
Les lignes de codes qui merdouillent sont les suivantes (mois = la valeur de la cellule a6)
:
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"C:\Salaire\" & mois & ".pdf", Quality:=xlQualityStandard, IncludeDocProperties:=True _
, IgnorePrintAreas:=False, OpenAfterPublish:=False
Range("F82").Select
(mois = la valeur de la cellule a6)
Pour mieux comprendre je me permets de joindre mes fichiers en exemple.
Aussi est-il possible de créer automatiquement un nouveau message sous outlook avec ce fichier .pdf joint ?
Je vous remercie par avance de l'aide que vous pourriez m'apporter.
Cordialement,