Print knop maken

[Joeri113]

Ik wil een print knop op tabblad 1 hebben zodat ik bijvoorbeeld blad 5 uit kan printen.
De code voor een makro krijg ik niet werkend.
In blad 5 moet A1:K52 uitgeprint worden wanneer op de knop in blad 1 gedrukt wordt.

Gr,
Joeri

 

[frimout]

Ben hier niet echt een specialist in maar heb eens een macro opgenomen.
Eerst en vooral maak je van A1:K52 een afdrukbereik

macro:
Sub Macro1()
Sheets("Blad5").Select
Application.Goto Reference:="Print_Area"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, _
IgnorePrintAreas:=False
End Sub

Vervolgens maak je een knop op blad 1 en daar kan je de macro aan toewijzen

Hopelijk ben je hier mee geholpen, succes

 

[Roncancio]

Sub Printen()
Sheets("Blad5").Range("A1:K52").PrintOut
End Sub

Met vriendelijke groet,


Roncancio

 

[frimout]

En, al geholpen???