Macro pour un enregistrement .pdf
sebanddo
Messages postés
1
Statut
Membre
-
Frenchie83 Messages postés 2254 Statut Membre -
Frenchie83 Messages postés 2254 Statut Membre -
Bonjour,
Je travaille en parallèle avec 2 dossiers, un sous forme d'un tableau de saisie et l'autre mis en forme façon "diplôme".
J'ai intégré des formule afin d'automatiser le transfert des données suivant la reférence du diplôme, ça me facilite beaucoup le travail, mais il me manque la partie enregistrement automatique.
Je souhaiterais enregistrer sous .pdf dans un répertoire défini avec comme nom du fichier le contenu d'une cellule (fusionnée)
Quelqu'un pourrait il m'aider?
Merci.
Je travaille en parallèle avec 2 dossiers, un sous forme d'un tableau de saisie et l'autre mis en forme façon "diplôme".
J'ai intégré des formule afin d'automatiser le transfert des données suivant la reférence du diplôme, ça me facilite beaucoup le travail, mais il me manque la partie enregistrement automatique.
Je souhaiterais enregistrer sous .pdf dans un répertoire défini avec comme nom du fichier le contenu d'une cellule (fusionnée)
Quelqu'un pourrait il m'aider?
Merci.
A voir également:
- Macro pour un enregistrement .pdf
- Lire le coran en français pdf - Télécharger - Histoire & Religion
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Save as pdf office 2007 - Télécharger - Bureautique
- Pdf watermark remover - Télécharger - PDF
- Notices gratuites pdf - Guide
1 réponse
Bonjour
Enregistre une macro pour l'enregistrement de ton fichier, en choisissant l'emplacement ou tu voudras le mettre, ce qui va te donner quelque chose comme ceci:
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= "C:\****\****\"NomduFichier.pdf", Quality:=xlQualityStandard , IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= False
Tu reprends ta macro et tu remplaces "NomduFichier.pdf", par range("l'adresse de la cellule fusionnée").value & ".PDF"
cdlt
Enregistre une macro pour l'enregistrement de ton fichier, en choisissant l'emplacement ou tu voudras le mettre, ce qui va te donner quelque chose comme ceci:
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= "C:\****\****\"NomduFichier.pdf", Quality:=xlQualityStandard , IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= False
Tu reprends ta macro et tu remplaces "NomduFichier.pdf", par range("l'adresse de la cellule fusionnée").value & ".PDF"
cdlt