Livio,

Put the print instruction in a for-next loop.
If the number of packages is in, say Cell T6 then:

For PrintRun = 1 To Range("T6").Value
Print a label
Next PrintRun

Henry


"Livio" wrote in message
...
I have a worksheet that calculates total nuber of packages of a
consignment;
I am now trying to run a macro that would print as many labels as the
total
number of packages, which could be as little as one or as much as 50. I
tried to copy and paste into the pages box of the print screen, but it
didn't
work.
Does anybody have a solution? The excel version is Office 2000.
Thanks