Export_PDF()

Résolu
Draydi -  
Bonjour,

J'ai la macro suivante qui permet d'enregistrer automatiquement une feuille excel sous format PDF dans un dossier précis.
ça marche parfaitement sous excel 2010 mais lorsque j'ai utilisé excel 2007 ça n'a pas marché!! je ne sais pas pourquoi, merci pour votre aide :

Sub Export_PDF()
Dim fichier As String

Date_F = Format(Date, "ddmmmm_")
'adaptez le nom de la feuille
With Worksheets("Historique Suivi Production")
fichier = "\" & Date_F & .Range("I4") & .Range("B4") & ".pdf"
Dossier = "Z:\Fiche Suivi Production 2016"
Chemin = Dossier & fichier
.ExportAsFixedFormat Type:=xlTypePDF, Filename:=Chemin, Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=False
End With
End Sub

3 réponses

  2.  Draydi Auteur
    Merci Patrice33740 pour la réponse, en effet lorsque j'exécute la macro, il m'affiche un débogage pour les lignes suivantes:

    .ExportAsFixedFormat Type:=xlTypePDF, Filename:=Chemin, Quality:=xlQualityStandard, _
    IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=False
    1. Patrice33740
      Avec un chemin valide, ça fonctionne !
    2. Draydi Auteur
      @Patrice33740Merci pour ta patience, mais ça ne fonctionne plus pour office 2007 mais fonctionne bien avec office 2010.
      Même j'ai vérifié le chemin!!
    3. Patrice33740
      Installes 2007 un le PC qui a aussi 2010, tu verra que si ça marche avec 2010, ça marche aussi avec 2007 !
      Quand tu changes de PC, la seule différence (entre 2007 et 2010) c'est le chemin complet d'accès à la feuille du fichier (disque/répertoire/ peuvent changer mais pas nomfichier/nomfeuille) !
  3. Patrice33740
    Bonjour,

    Pour moi avec 2007, ça fonctionne !
    ne serait-ce pas un problème de chemin ?