Bouton IMPRIMER

Fred0o

XLDnaute Barbatruc

• 28 Avril 2012

• #2

Re : Bouton IMPRIMER

Bonjour PatLac,

Visiblement, tu n'as pas fait de recherche sur ce forum car tu aurais immanquablement trouvé. Regardes donc les 5 liens suggérés en bas de cette discussion et peut-être trouveras-tu ton bonheur.

A+

 

Vote positif 0 Vote négatif

grisan29

XLDnaute Accro

• 28 Avril 2012

• #3

Re : Bouton IMPRIMER

bonjour Patlac
peu etre que ceci te convient a mettre derriere un bouton

Code:

Sub Impression()
' Impression Macro
    Sheets("Feuil1").Select
    ActiveWindow.SelectedSheets.PrintOut Copies:=2, Collate:=True
end sub

Pascal

 

Vote positif 0 Vote négatif

PatLac

XLDnaute Occasionnel

• 28 Avril 2012

• #4

Re : Bouton IMPRIMER

FredOo Bonjour !
Si, j´avais regardé, mais surement mal. 😀
Merci pour les liens, mais c´est trop pointu pour mon utilisation, je cherche juste un truc tout simple ...

Grisan29 Bonjour ! 😱
Est-ce que je peux abuser et te demander de l´inclure dans un exemple, avec le bouton, et le mettre en pièce jointe, car suis pas trop fut fut ... 🙁

D´avance merci

 

Vote positif 0 Vote négatif

PatLac

XLDnaute Occasionnel

• 28 Avril 2012

• #5

Re : Bouton IMPRIMER

Grisan29!
Ne tiens pas compte de mon dernier message, j´ai cherché un peu. 😛
Ci-dessous un exemple pour ceux comme moi qui ne sont pas fut fut ...🙄

J´ai une autre requete par contre :
Je voudrais imprimer sur une imprimante qui est sur une imprimante réseau, accessible soit par IP, soit par une adresse classique.
Une idée ? 😕
Merci.

 

Pièces jointes

• IMPRESSION.xls

  32.5 KB · Affichages: 128
• IMPRESSION.xls

  32.5 KB · Affichages: 128
• IMPRESSION.xls

  32.5 KB · Affichages: 128

Vote positif 0 Vote négatif

grisan29

XLDnaute Accro

• 28 Avril 2012

• #6

Re : Bouton IMPRIMER

bonjour PatLav
tant mieux si ma solution te vas car pour ce qui est du imprimer en réseau cela n'est pas de compétence et je laisse volontier la main a un autre😕

cordialement

Pascal

 

Vote positif 0 Vote négatif

PatLac

XLDnaute Occasionnel

• 28 Avril 2012

• #7

Re : Bouton IMPRIMER

Merci quand même !
Salutations. 😱

 

Vote positif 0 Vote négatif

JCGL

XLDnaute Barbatruc

• 28 Avril 2012

• #8

Re : Bouton IMPRIMER

Bonjour à tous,

Voici une syntaxe :

VB:

ActiveWindow.SelectedSheets.PrintOut Copies:=2, ActivePrinter:= _
        "\\BIBI\Microsoft XPS Document Writer sur Ne06:", Collate:=True

Pour récuperer le chemin exact de l'imprimante, tu peux lancer l'enregistreur de macro

A + à tous

 

Vote positif 0 Vote négatif

JCGL

XLDnaute Barbatruc

• 28 Avril 2012

• #9

Re : Bouton IMPRIMER

Bonjour à tous,

Surement plus simple :

VB:

Sub Impression()
Application.Dialogs(xlDialogPrinterSetup).Show
    ActiveSheet.PrintOut Copies:=2
End Sub

A + à tous

 

Vote positif 0 Vote négatif