Selection d'une imprimante à partir d'un bouton d'impression
5 réponses
johend
Bonjour à tous,
Voiila, j'ai réalisé un bouton d'impression sur ma feuille excel,
il marche bien, mais je voudrais pouvoir rajouter une ligne dans
la macro pour pouvoir mettre l'imprimante que je veut pour que
le document n'imprime plus sur l'imprimante par défaut...
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Corto
Bonjour johend, Pour changer l'imprimante active : Application.ActivePrinter = "Nom de l'imprimante" Pour spécifier l'imprimante à l'impression Range(ActiveSheet.PageSetup.PrintArea).PrintOut ActivePrinter:="Nom de l'imprimante"
Corto
johend a écrit :
Bonjour à tous,
Voiila, j'ai réalisé un bouton d'impression sur ma feuille excel, il marche bien, mais je voudrais pouvoir rajouter une ligne dans la macro pour pouvoir mettre l'imprimante que je veut pour que le document n'imprime plus sur l'imprimante par défaut...
Bonjour johend,
Pour changer l'imprimante active :
Application.ActivePrinter = "Nom de l'imprimante"
Pour spécifier l'imprimante à l'impression
Range(ActiveSheet.PageSetup.PrintArea).PrintOut
ActivePrinter:="Nom de l'imprimante"
Corto
johend a écrit :
Bonjour à tous,
Voiila, j'ai réalisé un bouton d'impression sur ma feuille excel,
il marche bien, mais je voudrais pouvoir rajouter une ligne dans
la macro pour pouvoir mettre l'imprimante que je veut pour que
le document n'imprime plus sur l'imprimante par défaut...
Bonjour johend, Pour changer l'imprimante active : Application.ActivePrinter = "Nom de l'imprimante" Pour spécifier l'imprimante à l'impression Range(ActiveSheet.PageSetup.PrintArea).PrintOut ActivePrinter:="Nom de l'imprimante"
Corto
johend a écrit :
Bonjour à tous,
Voiila, j'ai réalisé un bouton d'impression sur ma feuille excel, il marche bien, mais je voudrais pouvoir rajouter une ligne dans la macro pour pouvoir mettre l'imprimante que je veut pour que le document n'imprime plus sur l'imprimante par défaut...
var = Application.Dialogs(xlDialogPrinterSetup).Show
isabelle
johend a écrit :
Bonjour à tous,
Voiila, j'ai réalisé un bouton d'impression sur ma feuille excel, il marche bien, mais je voudrais pouvoir rajouter une ligne dans la macro pour pouvoir mettre l'imprimante que je veut pour que le document n'imprime plus sur l'imprimante par défaut...
var = Application.Dialogs(xlDialogPrinterSetup).Show
isabelle
johend a écrit :
Bonjour à tous,
Voiila, j'ai réalisé un bouton d'impression sur ma feuille excel,
il marche bien, mais je voudrais pouvoir rajouter une ligne dans
la macro pour pouvoir mettre l'imprimante que je veut pour que
le document n'imprime plus sur l'imprimante par défaut...
var = Application.Dialogs(xlDialogPrinterSetup).Show
isabelle
johend a écrit :
Bonjour à tous,
Voiila, j'ai réalisé un bouton d'impression sur ma feuille excel, il marche bien, mais je voudrais pouvoir rajouter une ligne dans la macro pour pouvoir mettre l'imprimante que je veut pour que le document n'imprime plus sur l'imprimante par défaut...
Bonjour johend, Pour changer l'imprimante active : Application.ActivePrinter = "Nom de l'imprimante" Pour spécifier l'imprimante à l'impression Range(ActiveSheet.PageSetup.PrintArea).PrintOut ActivePrinter:="Nom de l'imprimante"
Corto
johend a écrit :
Bonjour à tous,
Voiila, j'ai réalisé un bouton d'impression sur ma feuille excel, il marche bien, mais je voudrais pouvoir rajouter une ligne dans la macro pour pouvoir mettre l'imprimante que je veut pour que le document n'imprime plus sur l'imprimante par défaut...
Mais je dois mal la placer car il me met un message d'erreur (erreur d'execution '1004')
Pourriez vous m'aider....?
Merci beaucoup
@+
Corto a écrit le 23/04/2009 à 16h49 :
Bonjour johend,
Pour changer l'imprimante active :
Application.ActivePrinter = "Nom de l'imprimante"
Pour spécifier l'imprimante à l'impression
Range(ActiveSheet.PageSetup.PrintArea).PrintOut
ActivePrinter:="Nom de l'imprimante"
Corto
johend a écrit :
Bonjour à tous,
Voiila, j'ai réalisé un bouton d'impression sur ma feuille
excel,
il marche bien, mais je voudrais pouvoir rajouter une ligne dans
la macro pour pouvoir mettre l'imprimante que je veut pour que
le document n'imprime plus sur l'imprimante par défaut...
Bonjour johend, Pour changer l'imprimante active : Application.ActivePrinter = "Nom de l'imprimante" Pour spécifier l'imprimante à l'impression Range(ActiveSheet.PageSetup.PrintArea).PrintOut ActivePrinter:="Nom de l'imprimante"
Corto
johend a écrit :
Bonjour à tous,
Voiila, j'ai réalisé un bouton d'impression sur ma feuille excel, il marche bien, mais je voudrais pouvoir rajouter une ligne dans la macro pour pouvoir mettre l'imprimante que je veut pour que le document n'imprime plus sur l'imprimante par défaut...
Mais je dois mal la placer car il me met un message d'erreur (erreur d'execution '1004')
Pourriez vous m'aider....?
Merci beaucoup
@+
Corto
Bonjour johend, C'est le nom de l'imprimante tel qu'il apparait dans "Imprimantes et Télécopieurs" qu'il faut mettre. Exemple : "HP LaserJet 2000" Si tu ne sais pas quoi mettre utilise l'enregistreur de macros et imprime une page sur ton imprimante.
Corto
johend a écrit :
Corto a écrit le 23/04/2009 à 16h49 :
Bonjour johend, Pour changer l'imprimante active : Application.ActivePrinter = "Nom de l'imprimante" Pour spécifier l'imprimante à l'impression Range(ActiveSheet.PageSetup.PrintArea).PrintOut ActivePrinter:="Nom de l'imprimante"
Corto
johend a écrit :
Bonjour à tous,
Voiila, j'ai réalisé un bouton d'impression sur ma feuille excel, il marche bien, mais je voudrais pouvoir rajouter une ligne dans la macro pour pouvoir mettre l'imprimante que je veut pour que le document n'imprime plus sur l'imprimante par défaut...
Mais je dois mal la placer car il me met un message d'erreur (erreur d'execution '1004')
Pourriez vous m'aider....?
Merci beaucoup
@+
Bonjour johend,
C'est le nom de l'imprimante tel qu'il apparait dans "Imprimantes et
Télécopieurs" qu'il faut mettre.
Exemple : "HP LaserJet 2000"
Si tu ne sais pas quoi mettre utilise l'enregistreur de macros et
imprime une page sur ton imprimante.
Corto
johend a écrit :
Corto a écrit le 23/04/2009 à 16h49 :
Bonjour johend,
Pour changer l'imprimante active :
Application.ActivePrinter = "Nom de l'imprimante"
Pour spécifier l'imprimante à l'impression
Range(ActiveSheet.PageSetup.PrintArea).PrintOut
ActivePrinter:="Nom de l'imprimante"
Corto
johend a écrit :
Bonjour à tous,
Voiila, j'ai réalisé un bouton d'impression sur ma feuille
excel,
il marche bien, mais je voudrais pouvoir rajouter une ligne dans
la macro pour pouvoir mettre l'imprimante que je veut pour que
le document n'imprime plus sur l'imprimante par défaut...
Bonjour johend, C'est le nom de l'imprimante tel qu'il apparait dans "Imprimantes et Télécopieurs" qu'il faut mettre. Exemple : "HP LaserJet 2000" Si tu ne sais pas quoi mettre utilise l'enregistreur de macros et imprime une page sur ton imprimante.
Corto
johend a écrit :
Corto a écrit le 23/04/2009 à 16h49 :
Bonjour johend, Pour changer l'imprimante active : Application.ActivePrinter = "Nom de l'imprimante" Pour spécifier l'imprimante à l'impression Range(ActiveSheet.PageSetup.PrintArea).PrintOut ActivePrinter:="Nom de l'imprimante"
Corto
johend a écrit :
Bonjour à tous,
Voiila, j'ai réalisé un bouton d'impression sur ma feuille excel, il marche bien, mais je voudrais pouvoir rajouter une ligne dans la macro pour pouvoir mettre l'imprimante que je veut pour que le document n'imprime plus sur l'imprimante par défaut...
Mais je dois mal la placer car il me met un message d'erreur (erreur d'execution '1004')
Pourriez vous m'aider....?
Merci beaucoup
@+
johend
Corto a écrit le 24/04/2009 à 08h36 :
Bonjour johend, C'est le nom de l'imprimante tel qu'il apparait dans "Imprimantes et Télécopieurs" qu'il faut mettre. Exemple : "HP LaserJet 2000" Si tu ne sais pas quoi mettre utilise l'enregistreur de macros et imprime une page sur ton imprimante.
Corto
johend a écrit :
Corto a écrit le 23/04/2009 à 16h49 :
Bonjour johend, Pour changer l'imprimante active : Application.ActivePrinter = "Nom de l'imprimante" Pour spécifier l'imprimante à l'impression Range(ActiveSheet.PageSetup.PrintArea).PrintOut ActivePrinter:="Nom de l'imprimante"
Corto
johend a écrit :
Bonjour à tous,
Voiila, j'ai réalisé un bouton d'impression sur ma feuille excel, il marche bien, mais je voudrais pouvoir rajouter une ligne dans la macro pour pouvoir mettre l'imprimante que je veut pour que le document n'imprime plus sur l'imprimante par défaut...
Mais je dois mal la placer car il me met un message d'erreur (erreur d'execution '1004')
Pourriez vous m'aider....?
Merci beaucoup
@+
Oui je sait ça... mais c'est le bon Nom de l'imprimante que j'ai mis. Le problème que j'ai c'est où mettre cette ligne dans mon code??? Merci beaucoup pour la rapidité de vos réponse.
Corto a écrit le 24/04/2009 à 08h36 :
Bonjour johend,
C'est le nom de l'imprimante tel qu'il apparait dans "Imprimantes et
Télécopieurs" qu'il faut mettre.
Exemple : "HP LaserJet 2000"
Si tu ne sais pas quoi mettre utilise l'enregistreur de macros et
imprime une page sur ton imprimante.
Corto
johend a écrit :
Corto a écrit le 23/04/2009 à 16h49 :
Bonjour johend,
Pour changer l'imprimante active :
Application.ActivePrinter = "Nom de l'imprimante"
Pour spécifier l'imprimante à l'impression
Range(ActiveSheet.PageSetup.PrintArea).PrintOut
ActivePrinter:="Nom de l'imprimante"
Corto
johend a écrit :
Bonjour à tous,
Voiila, j'ai réalisé un bouton d'impression sur ma feuille
excel,
il marche bien, mais je voudrais pouvoir rajouter une ligne dans
la macro pour pouvoir mettre l'imprimante que je veut pour que
le document n'imprime plus sur l'imprimante par défaut...
Mais je dois mal la placer car il me met un message d'erreur (erreur
d'execution '1004')
Pourriez vous m'aider....?
Merci beaucoup
@+
Oui je sait ça... mais c'est le bon Nom de l'imprimante
que j'ai mis.
Le problème que j'ai c'est où mettre cette ligne dans mon code???
Merci beaucoup pour la rapidité de vos réponse.
Bonjour johend, C'est le nom de l'imprimante tel qu'il apparait dans "Imprimantes et Télécopieurs" qu'il faut mettre. Exemple : "HP LaserJet 2000" Si tu ne sais pas quoi mettre utilise l'enregistreur de macros et imprime une page sur ton imprimante.
Corto
johend a écrit :
Corto a écrit le 23/04/2009 à 16h49 :
Bonjour johend, Pour changer l'imprimante active : Application.ActivePrinter = "Nom de l'imprimante" Pour spécifier l'imprimante à l'impression Range(ActiveSheet.PageSetup.PrintArea).PrintOut ActivePrinter:="Nom de l'imprimante"
Corto
johend a écrit :
Bonjour à tous,
Voiila, j'ai réalisé un bouton d'impression sur ma feuille excel, il marche bien, mais je voudrais pouvoir rajouter une ligne dans la macro pour pouvoir mettre l'imprimante que je veut pour que le document n'imprime plus sur l'imprimante par défaut...
Mais je dois mal la placer car il me met un message d'erreur (erreur d'execution '1004')
Pourriez vous m'aider....?
Merci beaucoup
@+
Oui je sait ça... mais c'est le bon Nom de l'imprimante que j'ai mis. Le problème que j'ai c'est où mettre cette ligne dans mon code??? Merci beaucoup pour la rapidité de vos réponse.