Print Copies prompt

  • Thread starter Thread starter Amir
  • Start date Start date
A

Amir

Hi guys
I'm sending data from Access into Word and using among
other things this option to print;
objWord.ActiveDocument.PrintOut Background:=False,
Copies:=2
I would like it somehow to prompt user as to how many
copies he requires and then he would key it in a txtbox
perhaps and that will tell Word how many copies to print.
Right now i have it hard coded for testing purposes.
Any help would be great.
Thank you.
 
Hi Amir,
try...

dim intCopies as integer

' =inputbox(prompt,title,default)
intCopies=inputbox("Enter number of copies
required","PrintOut",1)
objWord.ActiveDocument.PrintOut Background:=False,
Copies:=intCopies

Luck
Jonathan
 
Thank you I will try it...

-----Original Message-----
Hi Amir,
try...

dim intCopies as integer

' =inputbox(prompt,title,default)
intCopies=inputbox("Enter number of copies
required","PrintOut",1)
objWord.ActiveDocument.PrintOut Background:=False,
Copies:=intCopies

Luck
Jonathan

.
Click to expand...
 
Back
Top