enregister automatiquement en pdf Résolu/Fermé

Question

Bonjour, 

J'ai créé un fichier excel avec différentes données et j'aimerai ajouter un bouton pour enregistrer automatiquement ce ficher au format pdf afin que certaines données ne soient pas perdues lors d'une ouverture ultérieure (comme la date du jour de création qui se met automatiquement)
J'aimerai également que le fichier s'enregistre en prenant des données dans 2 cellules (un chiffre = n° de fiche et un nom = nom du projet) et qu'il se range automatiquement dans un dossier sur le réseau de l'entreprise.

Tout d'abord est-ce possible??
et si oui quelqu'un peut-il m'aider?
(sachant que je ne maitrise pas rééllement les macro et visual basic)

N'hésitez pas à venir vers moi si mon explication n'est pas claire...

merci d'avance

via55 · Answer

Bonsoir

Une piste de travail à tester

Macro a mettre dans un module en l'adaptant à vos besoins

Dans le code du bouton mettre le nom de la macro

Sub enreg_PDF()
'

chemin = "xxx"  ' à noter ici le bon chemin style :"C:\Documents and Settings\Utilisateur\Mes documents\"
a= cells(1,1).value  ' récupère la donnée en cellule  ligne 1 col1 à adapter
b= cells(1,2).value   ' récupère la donnée en cellule  ligne 1 col21 à adapter
nom = a & b
fichier = chemin & nom & ".pdf"
    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=fichier, Quality:= _
        xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
        OpenAfterPublish:=False
    
End Sub

Cordialement

Mike-31 · Answer

Salut,

Essaye comme cela

Sub test()
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
        ActiveWorkbook.Path & "\" & ActiveWorkbook.Name & ".PDF"
End Sub

le fichier prendra le nom du fichier actif extension PDF, si tu veux donner un nom bien précis comme titi.PDF change cette ligne

ActiveWorkbook.Path & "\" & "titi.PDF"

CélineRP · Answer

solution de via55 testée et approuvée !!

Merci beaucoup !

Bonne journée.

Choubi3038 · Answer

Bonjour, 

Ma demande est assez similaire.
En cliquant sur un bouton je veux faire une copie de feuille vierge pour la remplir cela c'est fait.

Or après je veux cliquer sur un bouton enregistrer qui m'enregistre ma feuille dans un dossier annexe à mon classeur en pdf.
J'ai essayé tous vos codes mais aucun ne marche, il me dit souvent erreur de compilation.

Auriez-vous une idée? Merci.

Enregister automatiquement en pdf

4 réponses