prnten via vb

[Homeload]

Ik kom er niet helemaal uit,

Ik wil via vb een rang op een andere sheet uitprinten maar weet de code
Dacht zoiets maar dit werkt niet.


Private Sub CommandButton3_Click()

Sheets("Factuur").Select
Range("A3:H10").Select
Selection.PrintOut Copies:=1, Collate:=True

End sub

Ook zou ik graag op het excel sheet willen laten bepalen hoeveel kopie`s

Alvast hartelijk bedankt
Niels

 

[Jan van Asseldonk]

Je printcommando klopt.
Kan eventueel wel iets korter op de volgende manier.

Sheets("Factuur").Select
Range("A3:H10").PrintOut Copies:=1, Collate:=True

Als je het aantal kopien wil bepalen in je sheet kan dat als volgt:
Aantal kopien staat bijv. in Cel A1 op blad1.
Vervang Copies:=1 door
Copies:=Sheets("Blad1").Range("A1").Value