Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 260
Default Count Print Jobs

hey

Is it possible to count the number of times someone
printed something in a spreadhseet?

For instance lets say I in workbook "Test.xls" and
worksheet "Todd". Lets say I run the following code 5
times:

Worksheets("Wkly Renewals").Range("D7:F" & RngCounter +
2).PrintOut


If this is the case I need for the counter to keep track
and see this was my 5th time printing.


Thank you
Todd Huttenstine
  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 3,885
Default Count Print Jobs

Hi Todd
you could use the Beforeprint workbook event and store a value in your
sheet (or in a static variable)

--
Regards
Frank Kabel
Frankfurt, Germany


Todd Huttenstine wrote:
hey

Is it possible to count the number of times someone
printed something in a spreadhseet?

For instance lets say I in workbook "Test.xls" and
worksheet "Todd". Lets say I run the following code 5
times:

Worksheets("Wkly Renewals").Range("D7:F" & RngCounter +
2).PrintOut


If this is the case I need for the counter to keep track
and see this was my 5th time printing.


Thank you
Todd Huttenstine


  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 260
Default Count Print Jobs

How would I do that as a static variable?


-----Original Message-----
Hi Todd
you could use the Beforeprint workbook event and store a

value in your
sheet (or in a static variable)

--
Regards
Frank Kabel
Frankfurt, Germany


Todd Huttenstine wrote:
hey

Is it possible to count the number of times someone
printed something in a spreadhseet?

For instance lets say I in workbook "Test.xls" and
worksheet "Todd". Lets say I run the following code 5
times:

Worksheets("Wkly Renewals").Range("D7:F" & RngCounter +
2).PrintOut


If this is the case I need for the counter to keep track
and see this was my 5th time printing.


Thank you
Todd Huttenstine


.

  #4   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 3,885
Default Count Print Jobs

Hi
using the Beforeprint event put something like the following in your
workbook module:
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Static print_count
print_count = print_count + 1
MsgBox "print Job: " & print_count
End Sub

Note: This will also count the print preview

If you invoke the printing from a macro use something like the
following:

sub foo()
static print_count
Worksheets("Wkly Renewals").Range("D7:F" & RngCounter + 2).PrintOut
print_count = print_count + 1
MsgBox "print Job: " & print_count
end sub


--
Regards
Frank Kabel
Frankfurt, Germany


Todd Huttenstine wrote:
How would I do that as a static variable?


-----Original Message-----
Hi Todd
you could use the Beforeprint workbook event and store a value in
your sheet (or in a static variable)

--
Regards
Frank Kabel
Frankfurt, Germany


Todd Huttenstine wrote:
hey

Is it possible to count the number of times someone
printed something in a spreadhseet?

For instance lets say I in workbook "Test.xls" and
worksheet "Todd". Lets say I run the following code 5
times:

Worksheets("Wkly Renewals").Range("D7:F" & RngCounter +
2).PrintOut


If this is the case I need for the counter to keep track
and see this was my 5th time printing.


Thank you
Todd Huttenstine


.


Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Combining Print Jobs Together db Excel Discussion (Misc queries) 1 December 23rd 09 11:55 PM
Excel print jobs J Excel Discussion (Misc queries) 3 July 10th 08 07:18 PM
my excel is converting all my print jobs to print to file why? Ginger Excel Discussion (Misc queries) 2 April 10th 07 12:28 PM
single print job generates many print jobs Sherri Excel Discussion (Misc queries) 1 March 20th 07 09:34 PM
print jobs History of print jobs Excel Discussion (Misc queries) 3 June 16th 06 06:11 AM


All times are GMT +1. The time now is 02:20 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"