printer spooler

  • Thread starter Thread starter sunilpatel
  • Start date Start date
S

sunilpatel

Hi all,

What i need to do is to Print a certain area of the work sheet and then
check if it has vanished from the print spooler
(think thats what you call the place where documents sit until successfully
printed.).

Can anyone help, i have this so far. The important thing is to monitor if
area printed, as the requirement is that a particular area can only be
printed once.

Sub setprintarea()
Dim myrange As String
STRow% = 12
myrange = Cells(Rows.Count, 1).End(xlUp).Address
ActiveSheet.PageSetup.PrintArea = "$A$" & STRow & ":" & myrange
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub
Thanks
 
Did you ever get this to work?
I need the same capability.
If so, could you please post the code?
Thanks
 
Back
Top