Hi,

In a printing macro, is it possible to implement an menu option to choose the
printer (I have many printers)? If yes, any ideas how?

I quoted my macro.

Thx!

Werner


Sub PrintRows()

Dim lstRw As Long
Dim lstRwPlusTwo As Long
Dim Times As String

'Je détermine le nombre d'unités locatives à traiter.
Let lstRw = Sheets("Formulaire").Range("a65536").End(xlUp).Row
lstRwPlusTwo = lstRw + 2


Rows(1 & ":" & lstRwPlusTwo).Select

Times = InputBox("Entrez le nombre de copie à imprimer: ", "Copies to Print",
1)

Selection.PrintOut Copies:=Times, Collate:=True


End Sub