IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
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

Macros et VBA Excel Discussion :

Choisir une imprimante pour imprimer doc word sous VBA Excel


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre régulier
    Homme Profil pro
    tech metodes
    Inscrit en
    Avril 2024
    Messages
    7
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 54
    Localisation : France, Nord (Nord Pas de Calais)

    Informations professionnelles :
    Activité : tech metodes
    Secteur : High Tech - Électronique et micro-électronique

    Informations forums :
    Inscription : Avril 2024
    Messages : 7
    Par défaut Choisir une imprimante pour imprimer doc word sous VBA Excel
    bonjour

    a partir d'un fichier de stock excel , je cree un document word ( qui n'est pas visible) que je dois imprimer

    Set WordApp = CreateObject("Word.Application")
    Set WordDoc = WordApp.Documents.Add

    WordApp.Visible = false
    With WordDoc

    etc......

    WordDoc.PrintOut Copies:=(USF_code.TextBox3)

    je connais la commande Application.Dialogs(xlDialogPrinterSetup).Show , qui me permet de modifier l'imprimante pour imprimer le fichier excel .

    mais dans mon cas , je lance la commande WordDoc.PrintOut Copies:=(USF_code.TextBox3) qui est le document word cree dans vba excel et il faudrait que je puisse choisir l'imprimante ou ce document va s'imprimer

    je ne trouve pas de commande pour afficher une boite de dial et de choisir l'imprimante ou sera dirigé l'impression du document word

    si ce n'est pas faisable , peux t on lister les imprimante windows et changer l'imprimante par defaut windows

    merci d'avance

  2. #2
    Membre Expert
    Avatar de tototiti2008
    Homme Profil pro
    Formateur/développeur
    Inscrit en
    Octobre 2008
    Messages
    1 165
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Moselle (Lorraine)

    Informations professionnelles :
    Activité : Formateur/développeur

    Informations forums :
    Inscription : Octobre 2008
    Messages : 1 165
    Billets dans le blog
    2
    Par défaut
    Bonjour,

    Peut-être des pistes par là
    https://www.developpez.net/forums/d2...te-specifique/

  3. #3
    Membre Expert
    Inscrit en
    Décembre 2002
    Messages
    993
    Détails du profil
    Informations forums :
    Inscription : Décembre 2002
    Messages : 993
    Par défaut
    Salut, teste ceci:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    WordApp.Dialogs(wdDialogFilePrintSetup).Show
    WordDoc.PrintOut Copies:=CInt(USF_code.TextBox3)

  4. #4
    Membre régulier
    Homme Profil pro
    tech metodes
    Inscrit en
    Avril 2024
    Messages
    7
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 54
    Localisation : France, Nord (Nord Pas de Calais)

    Informations professionnelles :
    Activité : tech metodes
    Secteur : High Tech - Électronique et micro-électronique

    Informations forums :
    Inscription : Avril 2024
    Messages : 7
    Par défaut
    Merci. Je vais essayer.....

Discussions similaires

  1. Réponses: 5
    Dernier message: 30/08/2020, 22h15
  2. [XL-2010] Créer un bouton pour choisir une page à imprimer
    Par Maze31300 dans le forum Excel
    Réponses: 18
    Dernier message: 07/06/2016, 11h24
  3. [AC-2003] Création d un Formulaire pour choisir une imprimante
    Par taz devil dans le forum IHM
    Réponses: 2
    Dernier message: 16/09/2015, 18h52
  4. Choisir une puce pour une sous-liste
    Par laurentSc dans le forum Mise en page CSS
    Réponses: 5
    Dernier message: 17/09/2013, 09h47
  5. Duplication de tableaux Word sous VBA Excel
    Par gilles06 dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 09/01/2008, 11h49

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