Ouvrir fenetre "Enregistrer sous" + proposer nom + pdf

ju84 -  
 ju84 -
Bonjour,

Je cherche une macro qui me permette d'ouvrir la fenêtre Enregistrer Sous - et de proposer à défaut comme nom de fichier, le nom du contenu d'une cellule (P3) + de proposer de l'enregister en PDF par défaut.

L'utilisateur aura le choix du chemin d'enregistrement, et pourra renommer le fichier s'il le souhaite.

Merci

6 réponses

  1. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
     
    Re,

    Est-ce de ça dont vous parlez quand vous dites "module" Oui.

    a vous d'adapter la feuille

    Sub test()
        Fichier = Worksheets("Feuil1").Range("P3")
        fileSaveName = Application.GetSaveAsFilename(InitialFileName:=Fichier, fileFilter:="PDF Files (*.pdf), *.pdf")
    End Sub


    A+
    1
  2. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
     
    Bonjour,

    Quel excel avez-vous ?????
    0
  3. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
     
    Re,
    avez-vous recuperer le module microsoft pour 2007 qui permet de sauvegarder en pdf ???
    0
  4. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  5. ju84
     
    oui, je pense, car lorsque je fais enregistrer sous, j'ai la possibilité de choisir format "pdf" et ça enregistre le doc en pdf.

    Est-ce de ça dont vous parlez quand vous dites "module" ? (dsl je suis novice !)

    Merci
    0
  6. ju84
     
    C'est parfait ! ça marche ! Merci bcp pour votre réactivité et efficacité !
    Bonne fin de journée
    0