Je tente de choisir mon imprimante par VBA dans Excel

Fermé

Cliche44 Messages postés 7 Date d'inscription jeudi 19 avril 2018 Statut Membre Dernière intervention 24 août 2019 - Modifié le 23 août 2019 à 21:31
yg_be Messages postés 22731 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 27 avril 2024 - 24 août 2019 à 19:51

Bonjour, je tente d'imprimer, à l'aide d'un boutton sur Excel, trois feuilles différentes dont deux sélections différentes sur 2 imprimantes.

Premièrement, j'ai la sélection L19:Q35 que je dois imprimer sur ma "Brother DCP-7040" et sur ma "Brother DCP-L2540DW inscription". En suite, je dois imprimer la sélection L37:S67 sur ma "Brother DCP-7040"

Alors j'ai tenté d'écrire une VBA comme suit :

Private Sub CommandButton1_Click()

Appliction.ActivePrinter = "Brother DCP-7040"
ActiveSheet.Range("L19:Q35").PrintOut copies:=1

Appliction.ActivePrinter = "Brother DCP-L2540DW inscription"
ActiveSheet.Range("L19:Q35").PrintOut copies:=1

Appliction.ActivePrinter = "Brother DCP-7040"
ActiveSheet.Range("L37:S67").PrintOut copies:=1
End Sub

mais cela ne fonctionne pas, avez-vous une idée de ce qu'il ne fonctionne pas ?

A voir également:

Je tente de choisir mon imprimante par VBA dans Excel
Liste déroulante excel - Guide
Formule excel - Guide
Si et excel - Guide
Aller à la ligne dans une cellule excel - Guide
Mise en forme conditionnelle excel - Guide

1 réponse

Réponse 1 / 1

yg_be Messages postés 22731 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 27 avril 2024 1 477
23 août 2019 à 21:32

bonjour, "cela ne fonctionne pas": message d'erreur, comportement inattendu, ...?

Cliche44 Messages postés 7 Date d'inscription jeudi 19 avril 2018 Statut Membre Dernière intervention 24 août 2019
23 août 2019 à 21:33

Il m'indique : Erreur d'exécution '424' : Objet Requis

yg_be Messages postés 22731 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 27 avril 2024 1 477 > Cliche44 Messages postés 7 Date d'inscription jeudi 19 avril 2018 Statut Membre Dernière intervention 24 août 2019
Modifié le 23 août 2019 à 21:39

à quelle ligne de code?
as-tu bien ajouté

option explicit

en début de module?

Cliche44 Messages postés 7 Date d'inscription jeudi 19 avril 2018 Statut Membre Dernière intervention 24 août 2019
Modifié le 23 août 2019 à 21:43

pour la première :

Appliction.ActivePrinter = "Brother DCP-7040"

Et non, je ne connais pas ? Qu'est ce que c'est ?

une ligne importante à ajouter au début de chaque module, cela aide à découvrir les erreurs.

Cliche44 Messages postés 7 Date d'inscription jeudi 19 avril 2018 Statut Membre Dernière intervention 24 août 2019
23 août 2019 à 21:45

Comment est-ce qu'on l'écrit ?

Discussions similaires

Mon imprimante HP est en pause. Que faire ?

Discussions similaires

Newsletters