Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

  1. #1
    Membre actif
    Profil pro
    Inscrit en
    février 2003
    Messages
    894
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : février 2003
    Messages : 894
    Points : 266
    Points
    266

    Par défaut Attribuer nom du fichier à enregistrer

    Bonjour, j'ai un fichier que je converti en PDF en passant par WORD.

    Code VBA : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    Set objWord = CreateObject("Word.Application")
    Set net = WScript.CreateObject("WScript.Network")
    Set objDoc = objWord.Documents.Open("C:\Users\"+net.username+"\Desktop\Test.docx")
    strDefault = objWord.ActivePrinter
    objWord.ActivePrinter = "Microsoft Print To PDF"
     
    objWord.PrintOut
     
    objWord.ActivePrinter = strDefault
     
    objWord.Quit

    Lorsque j'exécute le programme, une fenêtre s'ouvre me demandant de taper le nouveau nom du fichier. Pourriez-vous me dire comment faire pour indiquer le nouveau nom à enregistrer svp?

    Merci d'avance de votre aide.
    Arsène

  2. #2
    Membre actif
    Profil pro
    Inscrit en
    février 2003
    Messages
    894
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : février 2003
    Messages : 894
    Points : 266
    Points
    266

    Par défaut

    Je pense qu'il doit falloir ajouter le nom du fichier après le print out :

    Code VBA : Sélectionner tout - Visualiser dans une fenêtre à part
    objWord.PrintOut True, , 4, , , , , 1, "2-", 0, , True, , , , 0, 0, 0, 0

    quelque part entre deux virgules.

Discussions similaires

  1. Nom de fichier à enregistrer dans un JFileChooser
    Par amal talabi dans le forum Agents de placement/Fenêtres
    Réponses: 4
    Dernier message: 19/09/2012, 13h53
  2. [Débutant] StreamWriter "nom du fichier enregistrer"
    Par EvexR dans le forum C#
    Réponses: 2
    Dernier message: 18/09/2011, 12h33
  3. [XL-2003] supprimer les Guillemets autour du nom de fichier à enregistrer
    Par comme de bien entendu dans le forum Excel
    Réponses: 14
    Dernier message: 11/08/2011, 11h40
  4. Inclure date "now" dans le nom de fichier à enregistrer
    Par Maxime082 dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 25/05/2011, 21h59
  5. [JFileChooser] initialiser le nom de fichier à enregistrer de showSaveDialog
    Par ouchemhou dans le forum Agents de placement/Fenêtres
    Réponses: 5
    Dernier message: 06/10/2008, 10h02

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo