Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming,microsoft.public.excel.worksheet.functions
|
|||
|
|||
Count number of prints.
Luis
not sure if I've understood you properly. The routine that follows is slightly modified from the VB Help for VPageBreaks and HPageBreaks Sub CountPageBreaks() Dim cFull As Long Dim cPartial As Long cFull = 0 cPartial = 0 For Each pb In Worksheets(1).VPageBreaks If pb.Extent = xlPageBreakFull Then cFull = cFull + 1 Else cPartial = cPartial + 1 End If Next MsgBox cFull & " full-screen page breaks, " & cPartial & _ " print-area page breaks" Range("I1").Value = cFull cFull = 0 cPartial = 0 For Each pb In Worksheets(1).HPageBreaks If pb.Extent = xlPageBreakFull Then cFull = cFull + 1 Else cPartial = cPartial + 1 End If Next MsgBox cFull & " full-screen page breaks, " & cPartial & _ " print-area page breaks" Range("I2").Value = cFull End Sub Regards Trevor "Luis Miguel" wrote in message ... Hello, I want to know if is possible to put, in a cell, a counter of number of prints in a sheet or xls file. Thanks in advance, Luis Miguel. |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Set number of prints in page setup | Excel Discussion (Misc queries) | |||
Is there a way to default the number times a document prints? | Excel Discussion (Misc queries) | |||
count each cell that have a number and take that number and count. | Excel Discussion (Misc queries) | |||
½ symbol prints a 2 and Winding square box prints a F | Excel Discussion (Misc queries) | |||
Number count - postcodes and need to count the numbers of tim... | Excel Discussion (Misc queries) |