Hi Milos,

For i = 1 To Range("s2")


Warm Regards,
Crystal
Microsoft Access MVP 2006

*
Have an awesome day ;)

remote programming and training
strive4peace2006 at yahoo.com

*

milos wrote:
Thanks for the answer again, forgety my previous question, I found it out
lately.
But: What if I want the range to be from i=1 to (s2) - so not the exact
number (40) but a value in a cell.

Kaak pÃ*Å¡e:


For i = 1 to 40

Range("A1").value = i
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True

next i


--
Kaak
------------------------------------------------------------------------
Kaak's Profile: http://www.excelforum.com/member.php...fo&userid=7513
View this thread: http://www.excelforum.com/showthread...hreadid=555909