| Home |
| Search |
| Today's Posts |
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
convert multiple sheets into PDF
hi,
i have some code to convert multiple sheets to PDF. i can get up to 3 sheets into one PDF file, but when i do anything more than that it only prints the last sheet selected instead of all of them. here is my sample: Sheets(Array("VGA Summary", "1Q Test", "1N Test")).Select ActiveWindow.SelectedSheets.PrintOut , ActivePrinter:="PDFCreator" i would like to add more sheet names to the array, but when i do it wont work. thanks in advance, geebee |
|
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
convert multiple sheets into PDF
I never used PDFCreator but you can do this
Sheets(Array("VGA Summary", "1Q Test", "1N Test")).Copy Add your other sheets in the array You have a new workbook now with all your sheet create a pdf of this workbook and delete the file -- Regards Ron de Bruin http://www.rondebruin.nl/tips.htm "geebee" (noSPAMs) wrote in message ... hi, i have some code to convert multiple sheets to PDF. i can get up to 3 sheets into one PDF file, but when i do anything more than that it only prints the last sheet selected instead of all of them. here is my sample: Sheets(Array("VGA Summary", "1Q Test", "1N Test")).Select ActiveWindow.SelectedSheets.PrintOut , ActivePrinter:="PDFCreator" i would like to add more sheet names to the array, but when i do it wont work. thanks in advance, geebee |
|
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
convert multiple sheets into PDF
hi,
i am not sure what you mean by this. i mean what would be the code? is there a better way to write the coee instead of using an array? thanks in advance, geebee "Ron de Bruin" wrote: I never used PDFCreator but you can do this Sheets(Array("VGA Summary", "1Q Test", "1N Test")).Copy Add your other sheets in the array You have a new workbook now with all your sheet create a pdf of this workbook and delete the file -- Regards Ron de Bruin http://www.rondebruin.nl/tips.htm "geebee" (noSPAMs) wrote in message ... hi, i have some code to convert multiple sheets to PDF. i can get up to 3 sheets into one PDF file, but when i do anything more than that it only prints the last sheet selected instead of all of them. here is my sample: Sheets(Array("VGA Summary", "1Q Test", "1N Test")).Select ActiveWindow.SelectedSheets.PrintOut , ActivePrinter:="PDFCreator" i would like to add more sheet names to the array, but when i do it wont work. thanks in advance, geebee |
|
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
convert multiple sheets into PDF
Something like this
Dim wb As Workbook Sheets(Array("VGA Summary", "1Q Test", "1N Test")).Copy Set wb = ActiveWorkbook wb.PrintOut , ActivePrinter:="PDFCreator" wb.Close False -- Regards Ron de Bruin http://www.rondebruin.nl/tips.htm "geebee" (noSPAMs) wrote in message ... hi, i am not sure what you mean by this. i mean what would be the code? is there a better way to write the coee instead of using an array? thanks in advance, geebee "Ron de Bruin" wrote: I never used PDFCreator but you can do this Sheets(Array("VGA Summary", "1Q Test", "1N Test")).Copy Add your other sheets in the array You have a new workbook now with all your sheet create a pdf of this workbook and delete the file -- Regards Ron de Bruin http://www.rondebruin.nl/tips.htm "geebee" (noSPAMs) wrote in message ... hi, i have some code to convert multiple sheets to PDF. i can get up to 3 sheets into one PDF file, but when i do anything more than that it only prints the last sheet selected instead of all of them. here is my sample: Sheets(Array("VGA Summary", "1Q Test", "1N Test")).Select ActiveWindow.SelectedSheets.PrintOut , ActivePrinter:="PDFCreator" i would like to add more sheet names to the array, but when i do it wont work. thanks in advance, geebee |
|
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
convert multiple sheets into PDF
hi,
i tried your code recommendation. basically what it did was copy the sheets to a new workbook. now everything works fine as long as you have 3 sheets or less. but when you have more than 3 sheets, only the last one is saved as the pdf. why is this? thanks in advance, geebee "Ron de Bruin" wrote: Something like this Dim wb As Workbook Sheets(Array("VGA Summary", "1Q Test", "1N Test")).Copy Set wb = ActiveWorkbook wb.PrintOut , ActivePrinter:="PDFCreator" wb.Close False -- Regards Ron de Bruin http://www.rondebruin.nl/tips.htm "geebee" (noSPAMs) wrote in message ... hi, i am not sure what you mean by this. i mean what would be the code? is there a better way to write the coee instead of using an array? thanks in advance, geebee "Ron de Bruin" wrote: I never used PDFCreator but you can do this Sheets(Array("VGA Summary", "1Q Test", "1N Test")).Copy Add your other sheets in the array You have a new workbook now with all your sheet create a pdf of this workbook and delete the file -- Regards Ron de Bruin http://www.rondebruin.nl/tips.htm "geebee" (noSPAMs) wrote in message ... hi, i have some code to convert multiple sheets to PDF. i can get up to 3 sheets into one PDF file, but when i do anything more than that it only prints the last sheet selected instead of all of them. here is my sample: Sheets(Array("VGA Summary", "1Q Test", "1N Test")).Select ActiveWindow.SelectedSheets.PrintOut , ActivePrinter:="PDFCreator" i would like to add more sheet names to the array, but when i do it wont work. thanks in advance, geebee |
|
#6
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
convert multiple sheets into PDF
Sorry I not know the program PDFCreator.
With the Excel 2007 program you can print the whole workbook http://www.rondebruin.nl/pdf.htm Do you not have a option to do this ? -- Regards Ron de Bruin http://www.rondebruin.nl/tips.htm "geebee" (noSPAMs) wrote in message ... hi, i tried your code recommendation. basically what it did was copy the sheets to a new workbook. now everything works fine as long as you have 3 sheets or less. but when you have more than 3 sheets, only the last one is saved as the pdf. why is this? thanks in advance, geebee "Ron de Bruin" wrote: Something like this Dim wb As Workbook Sheets(Array("VGA Summary", "1Q Test", "1N Test")).Copy Set wb = ActiveWorkbook wb.PrintOut , ActivePrinter:="PDFCreator" wb.Close False -- Regards Ron de Bruin http://www.rondebruin.nl/tips.htm "geebee" (noSPAMs) wrote in message ... hi, i am not sure what you mean by this. i mean what would be the code? is there a better way to write the coee instead of using an array? thanks in advance, geebee "Ron de Bruin" wrote: I never used PDFCreator but you can do this Sheets(Array("VGA Summary", "1Q Test", "1N Test")).Copy Add your other sheets in the array You have a new workbook now with all your sheet create a pdf of this workbook and delete the file -- Regards Ron de Bruin http://www.rondebruin.nl/tips.htm "geebee" (noSPAMs) wrote in message ... hi, i have some code to convert multiple sheets to PDF. i can get up to 3 sheets into one PDF file, but when i do anything more than that it only prints the last sheet selected instead of all of them. here is my sample: Sheets(Array("VGA Summary", "1Q Test", "1N Test")).Select ActiveWindow.SelectedSheets.PrintOut , ActivePrinter:="PDFCreator" i would like to add more sheet names to the array, but when i do it wont work. thanks in advance, geebee |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| How to update data from multiple sheets to one specific sheets | Excel Discussion (Misc queries) | |||
| Convert multiple excel files with multiple sheets to PDF - how? | Excel Discussion (Misc queries) | |||
| Excel Convert Multiple Rows into Multiple Columns | Excel Programming | |||
| Excel Convert Multiple Rows into Multiple Columns | Excel Worksheet Functions | |||
| Multiple Sheets (Need to create 500 individual sheets in one workbook, pulling DATA | Excel Worksheet Functions | |||
Linear Mode
