drukknop om pagina te printen

[mikkie19]

is het mogelijk om een drukknop te maken, die er voor zorgt dat de pagina afdrukt.
Zag dat het mogelijk is om een knop te maken om het werkblad te mailen. lijkt me dat het dan ook mogelijk is om het te laten printen!!!

Wie o wie!

Alvast bedankt!

Mikkie19

 

[huijb]

Dat kan op deze manier;
Private Sub CommandButton1_Click()
Worksheets("gegevens").Activate
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Preview:=False, Collate:=True
End Sub

 

[wildboy]

hey Mikky,

ja hoor dat is mogelijk met een beetje VBA

bij deze de code ff knopje plaatsen op je werkblad
en de code.

Private Sub CommandButton1_Click()
'print pagina op de standaard printer
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub

 

[LucB]

Afdrukken zonder knop??