Niet dubbelzijdig printen

[gerenmarly]

Hoi allemaal

Ik heb een document gemaakt die een reparatie opdracht invuld
deze bon is in drievoud
hij moet dus drie maal geprint worden aan een zijde
de printer staat altijd op dubbelzijdig afdrukken en deze mag niet gewijzigd worden
hoe kan ik dit met eventueel een VBA oplossen zodat het document(bon) 3X wordt geprint aan een zijde

Ger

 

[Cobbe]

Wat je kan doen is onder andere een kopie van de printer installeren en de kopie dan standaard al instellen op NIET dubbelzijdig printen. Daarna hoef je in Excel maar deze kopie te kiezen om af te drukken. Je kan dan deze printer kiezen via VBA.

 

[Cobbe]

Wat je kan doen is onder andere een kopie van de printer installeren en de kopie dan standaard al instellen op NIET dubbelzijdig printen. Daarna hoef je in Excel maar deze kopie te kiezen om af te drukken. Je kan dan deze printer kiezen via VBA.

Anders kan je deze code eens testen van Warme Bakkertje:

Sub Printen()
' printer instellen op duplex printen
SetPrinterToDuplex "printernaam", 2

' printen
Activesheet.PrintOut
   
' printer terugzetten op enkelzijdig printen
SetPrinterToDuplex "printernaam", 1
End Sub

 

[gerenmarly]

Hoi Cobbe

Ben bang dat dat niet werkt
het document wordt op ± 25 netwerkprinters gebruikt
deze printers hebben allemaal een andere naam

het moet iets worden wat in het Exel bestand komt te staan

Ger

 

[Cobbe]

Daar kan je toch deze weer voor inzetten:

Private Sub PrinterNaam()
   Dim Pnaam As String
   Pnaam = Application.ActivePrinter
   MsgBox Pnaam
End Sub

 

[gerenmarly]

Hoi Cobbe

hoe ziet de hele code er dan uit ?

Ger

 

[Cobbe]

Daar horen nog enkele functions bij, maar het zal voor vanavond zijn.
Heb dringende boodschappen te doen.

 

[Cobbe]

Het blijkt toch veel lastiger te zijn als gedacht,
Veel code en veel risico op vastlopers.
Dus omdenken:
Als je 3 bonnen moet afdrukken op een dubbelzijdige printer voeg er dan een blanco blad tussen zodat je vijf bonnen hebt uit te drukken,
waarvan 3 gevuld en 2 leeg.

Ik denk dat dit handiger is en vrij makkelijk te doen is zonder foutrisico.