Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.misc,microsoft.public.excel.programming,microsoft.public.excel.worksheet.functions
|
|||
|
|||
how to count number of pages in worksheet
i want to insert the count of total number of pages of a worksheet in a cell
of the same worksheet. this should be done automatically using worksheet formula or visual basic code or macro. please help |
#2
Posted to microsoft.public.excel.misc,microsoft.public.excel.programming,microsoft.public.excel.worksheet.functions
|
|||
|
|||
how to count number of pages in worksheet
Hello I hope this helps, go to the code in ThisWorkBook.
You can do this by pushing ALT+F11 then right clicking on "ThisWorkBook" on the left, and left clicking on view code. Then paste in the following Private Sub Workbook_Open() Sheets("NameOfSheet").Cells(1, 1).Value = Worksheets.Count End Sub When the worksheet opens it'll count the number of worksheets and put this value in a specified cell. So in this case if you had a sheet named NameOfSheet it would put a number in Row 1, Column A. Hope this helped. "msnews" wrote: i want to insert the count of total number of pages of a worksheet in a cell of the same worksheet. this should be done automatically using worksheet formula or visual basic code or macro. please help |
#3
Posted to microsoft.public.excel.misc,microsoft.public.excel.programming,microsoft.public.excel.worksheet.functions
|
|||
|
|||
how to count number of pages in worksheet
I am reading your question differently than Nate did... it looks to me like
you want to know how many pages it will take to print out the worksheet itself (not how many worksheets are in the workbook). If I am right, copy/paste the following code into the code window for the worksheet you want this functionality on (right click the worksheet's tab and select View Code from the popup menu that appears).... Private Sub Worksheet_Change(ByVal Target As Range) On Error GoTo Whoops Application.EnableEvents = False Range("A1").Value = ExecuteExcel4Macro("GET.DOCUMENT(50)") Whoops: Application.EnableEvents = True End Sub Rick "NateBuckley" wrote in message ... Hello I hope this helps, go to the code in ThisWorkBook. You can do this by pushing ALT+F11 then right clicking on "ThisWorkBook" on the left, and left clicking on view code. Then paste in the following Private Sub Workbook_Open() Sheets("NameOfSheet").Cells(1, 1).Value = Worksheets.Count End Sub When the worksheet opens it'll count the number of worksheets and put this value in a specified cell. So in this case if you had a sheet named NameOfSheet it would put a number in Row 1, Column A. Hope this helped. "msnews" wrote: i want to insert the count of total number of pages of a worksheet in a cell of the same worksheet. this should be done automatically using worksheet formula or visual basic code or macro. please help |
#4
Posted to microsoft.public.excel.misc,microsoft.public.excel.programming,microsoft.public.excel.worksheet.functions
|
|||
|
|||
how to count number of pages in worksheet
you have guessed it correctly.
i want to know how many pages will print when i give print command on a particular worksheet (and not how many worksheets are there in a particular workbook) actually i want to display the following text on a particular column cells page x of y (where x is the particular page on which the cell lies and y is the total number of pages that would print) please help "Rick Rothstein (MVP - VB)" wrote in message ... I am reading your question differently than Nate did... it looks to me like you want to know how many pages it will take to print out the worksheet itself (not how many worksheets are in the workbook). If I am right, copy/paste the following code into the code window for the worksheet you want this functionality on (right click the worksheet's tab and select View Code from the popup menu that appears).... Private Sub Worksheet_Change(ByVal Target As Range) On Error GoTo Whoops Application.EnableEvents = False Range("A1").Value = ExecuteExcel4Macro("GET.DOCUMENT(50)") Whoops: Application.EnableEvents = True End Sub Rick "NateBuckley" wrote in message ... Hello I hope this helps, go to the code in ThisWorkBook. You can do this by pushing ALT+F11 then right clicking on "ThisWorkBook" on the left, and left clicking on view code. Then paste in the following Private Sub Workbook_Open() Sheets("NameOfSheet").Cells(1, 1).Value = Worksheets.Count End Sub When the worksheet opens it'll count the number of worksheets and put this value in a specified cell. So in this case if you had a sheet named NameOfSheet it would put a number in Row 1, Column A. Hope this helped. "msnews" wrote: i want to insert the count of total number of pages of a worksheet in a cell of the same worksheet. this should be done automatically using worksheet formula or visual basic code or macro. please help |
#5
Posted to microsoft.public.excel.misc,microsoft.public.excel.programming,microsoft.public.excel.worksheet.functions
|
|||
|
|||
how to count number of pages in worksheet
and i dont want to copy the function or code on all worksheets in my
workbooks. i would like to use something like code in a module file. i would like to have a general code which i can use in all worksheets of my workbooks please help. "Rick Rothstein (MVP - VB)" wrote in message ... I am reading your question differently than Nate did... it looks to me like you want to know how many pages it will take to print out the worksheet itself (not how many worksheets are in the workbook). If I am right, copy/paste the following code into the code window for the worksheet you want this functionality on (right click the worksheet's tab and select View Code from the popup menu that appears).... Private Sub Worksheet_Change(ByVal Target As Range) On Error GoTo Whoops Application.EnableEvents = False Range("A1").Value = ExecuteExcel4Macro("GET.DOCUMENT(50)") Whoops: Application.EnableEvents = True End Sub Rick "NateBuckley" wrote in message ... Hello I hope this helps, go to the code in ThisWorkBook. You can do this by pushing ALT+F11 then right clicking on "ThisWorkBook" on the left, and left clicking on view code. Then paste in the following Private Sub Workbook_Open() Sheets("NameOfSheet").Cells(1, 1).Value = Worksheets.Count End Sub When the worksheet opens it'll count the number of worksheets and put this value in a specified cell. So in this case if you had a sheet named NameOfSheet it would put a number in Row 1, Column A. Hope this helped. "msnews" wrote: i want to insert the count of total number of pages of a worksheet in a cell of the same worksheet. this should be done automatically using worksheet formula or visual basic code or macro. please help |
#6
Posted to microsoft.public.excel.misc,microsoft.public.excel.programming,microsoft.public.excel.worksheet.functions
|
|||
|
|||
how to count number of pages in worksheet
My apologies, I misread what you put.
"S N" wrote: you have guessed it correctly. i want to know how many pages will print when i give print command on a particular worksheet (and not how many worksheets are there in a particular workbook) actually i want to display the following text on a particular column cells page x of y (where x is the particular page on which the cell lies and y is the total number of pages that would print) please help "Rick Rothstein (MVP - VB)" wrote in message ... I am reading your question differently than Nate did... it looks to me like you want to know how many pages it will take to print out the worksheet itself (not how many worksheets are in the workbook). If I am right, copy/paste the following code into the code window for the worksheet you want this functionality on (right click the worksheet's tab and select View Code from the popup menu that appears).... Private Sub Worksheet_Change(ByVal Target As Range) On Error GoTo Whoops Application.EnableEvents = False Range("A1").Value = ExecuteExcel4Macro("GET.DOCUMENT(50)") Whoops: Application.EnableEvents = True End Sub Rick "NateBuckley" wrote in message ... Hello I hope this helps, go to the code in ThisWorkBook. You can do this by pushing ALT+F11 then right clicking on "ThisWorkBook" on the left, and left clicking on view code. Then paste in the following Private Sub Workbook_Open() Sheets("NameOfSheet").Cells(1, 1).Value = Worksheets.Count End Sub When the worksheet opens it'll count the number of worksheets and put this value in a specified cell. So in this case if you had a sheet named NameOfSheet it would put a number in Row 1, Column A. Hope this helped. "msnews" wrote: i want to insert the count of total number of pages of a worksheet in a cell of the same worksheet. this should be done automatically using worksheet formula or visual basic code or macro. please help |
#7
Posted to microsoft.public.excel.misc,microsoft.public.excel.programming,microsoft.public.excel.worksheet.functions
|
|||
|
|||
how to count number of pages in worksheet
Hi,
Cant you just use the Header or the Footer section where excel can give you that automatically ? Regards Jean-Yves "S N" wrote in message ... and i dont want to copy the function or code on all worksheets in my workbooks. i would like to use something like code in a module file. i would like to have a general code which i can use in all worksheets of my workbooks please help. "Rick Rothstein (MVP - VB)" wrote in message ... I am reading your question differently than Nate did... it looks to me like you want to know how many pages it will take to print out the worksheet itself (not how many worksheets are in the workbook). If I am right, copy/paste the following code into the code window for the worksheet you want this functionality on (right click the worksheet's tab and select View Code from the popup menu that appears).... Private Sub Worksheet_Change(ByVal Target As Range) On Error GoTo Whoops Application.EnableEvents = False Range("A1").Value = ExecuteExcel4Macro("GET.DOCUMENT(50)") Whoops: Application.EnableEvents = True End Sub Rick "NateBuckley" wrote in message ... Hello I hope this helps, go to the code in ThisWorkBook. You can do this by pushing ALT+F11 then right clicking on "ThisWorkBook" on the left, and left clicking on view code. Then paste in the following Private Sub Workbook_Open() Sheets("NameOfSheet").Cells(1, 1).Value = Worksheets.Count End Sub When the worksheet opens it'll count the number of worksheets and put this value in a specified cell. So in this case if you had a sheet named NameOfSheet it would put a number in Row 1, Column A. Hope this helped. "msnews" wrote: i want to insert the count of total number of pages of a worksheet in a cell of the same worksheet. this should be done automatically using worksheet formula or visual basic code or macro. please help |
#8
Posted to microsoft.public.excel.misc,microsoft.public.excel.programming,microsoft.public.excel.worksheet.functions
|
|||
|
|||
how to count number of pages in worksheet
actually i am using the value in a cell in the table.
hence i cant use header and footer. i want to have a function for getting the value. please help. "Jean-Yves TFELT" <noSpam@I_Hate_Spam wrote in message ... Hi, Cant you just use the Header or the Footer section where excel can give you that automatically ? Regards Jean-Yves "S N" wrote in message ... and i dont want to copy the function or code on all worksheets in my workbooks. i would like to use something like code in a module file. i would like to have a general code which i can use in all worksheets of my workbooks please help. "Rick Rothstein (MVP - VB)" wrote in message ... I am reading your question differently than Nate did... it looks to me like you want to know how many pages it will take to print out the worksheet itself (not how many worksheets are in the workbook). If I am right, copy/paste the following code into the code window for the worksheet you want this functionality on (right click the worksheet's tab and select View Code from the popup menu that appears).... Private Sub Worksheet_Change(ByVal Target As Range) On Error GoTo Whoops Application.EnableEvents = False Range("A1").Value = ExecuteExcel4Macro("GET.DOCUMENT(50)") Whoops: Application.EnableEvents = True End Sub Rick "NateBuckley" wrote in message ... Hello I hope this helps, go to the code in ThisWorkBook. You can do this by pushing ALT+F11 then right clicking on "ThisWorkBook" on the left, and left clicking on view code. Then paste in the following Private Sub Workbook_Open() Sheets("NameOfSheet").Cells(1, 1).Value = Worksheets.Count End Sub When the worksheet opens it'll count the number of worksheets and put this value in a specified cell. So in this case if you had a sheet named NameOfSheet it would put a number in Row 1, Column A. Hope this helped. "msnews" wrote: i want to insert the count of total number of pages of a worksheet in a cell of the same worksheet. this should be done automatically using worksheet formula or visual basic code or macro. please help |
#9
Posted to microsoft.public.excel.misc,microsoft.public.excel.programming,microsoft.public.excel.worksheet.functions
|
|||
|
|||
how to count number of pages in worksheet
In order for you to be able to put the page number on each page, I guessing
that would mean there are set cells reserved for the page number... what are those cell addresses? Rick "S N" wrote in message ... actually i am using the value in a cell in the table. hence i cant use header and footer. i want to have a function for getting the value. please help. "Jean-Yves TFELT" <noSpam@I_Hate_Spam wrote in message ... Hi, Cant you just use the Header or the Footer section where excel can give you that automatically ? Regards Jean-Yves "S N" wrote in message ... and i dont want to copy the function or code on all worksheets in my workbooks. i would like to use something like code in a module file. i would like to have a general code which i can use in all worksheets of my workbooks please help. "Rick Rothstein (MVP - VB)" wrote in message ... I am reading your question differently than Nate did... it looks to me like you want to know how many pages it will take to print out the worksheet itself (not how many worksheets are in the workbook). If I am right, copy/paste the following code into the code window for the worksheet you want this functionality on (right click the worksheet's tab and select View Code from the popup menu that appears).... Private Sub Worksheet_Change(ByVal Target As Range) On Error GoTo Whoops Application.EnableEvents = False Range("A1").Value = ExecuteExcel4Macro("GET.DOCUMENT(50)") Whoops: Application.EnableEvents = True End Sub Rick "NateBuckley" wrote in message ... Hello I hope this helps, go to the code in ThisWorkBook. You can do this by pushing ALT+F11 then right clicking on "ThisWorkBook" on the left, and left clicking on view code. Then paste in the following Private Sub Workbook_Open() Sheets("NameOfSheet").Cells(1, 1).Value = Worksheets.Count End Sub When the worksheet opens it'll count the number of worksheets and put this value in a specified cell. So in this case if you had a sheet named NameOfSheet it would put a number in Row 1, Column A. Hope this helped. "msnews" wrote: i want to insert the count of total number of pages of a worksheet in a cell of the same worksheet. this should be done automatically using worksheet formula or visual basic code or macro. please help |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
how to count number of pages in worksheet | Excel Worksheet Functions | |||
Number of pages in worksheet doesn't match Print Preview pages | Excel Discussion (Misc queries) | |||
how to count number of pages in worksheet | Excel Discussion (Misc queries) | |||
Count number of pages | Excel Worksheet Functions | |||
How to count number of pages in a named range | Excel Programming |