| Home |
| Search |
| Today's Posts |
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Printing
I am trying to complete a macro that is linked to a button to print multiple
sheets from a workbook. The macro is intended to read a number from the first sheet to determine how many sheets to print. This should be a short program, but How would I write a for loop to access a different sheet each time. This is what I have For Coun = 1 To Vio_Num Sheets("?").PageSetup.PrintArea = "$A$1:$L$45" The ? is where I need the incementing value to go. Is this possible? |
|
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Printing
Sheets(Coun).PageSetup.PrintArea = "$A$1:$L$45" -- Jim "Brent" wrote in message ... |I am trying to complete a macro that is linked to a button to print multiple | sheets from a workbook. The macro is intended to read a number from the | first sheet to determine how many sheets to print. This should be a short | program, but How would I write a for loop to access a different sheet each | time. This is what I have | | For Coun = 1 To Vio_Num | | Sheets("?").PageSetup.PrintArea = "$A$1:$L$45" | | | The ? is where I need the incementing value to go. Is this possible? |
|
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Printing
Sub AAAA()
Vio_Num = 3 For Coun = 1 To Vio_Num Sheets(Coun).Activate ActiveSheet.PageSetup.PrintArea = "$A$1:$L$45" Next End Sub -- Regards, Tom Ogilvy "Brent" wrote in message ... I am trying to complete a macro that is linked to a button to print multiple sheets from a workbook. The macro is intended to read a number from the first sheet to determine how many sheets to print. This should be a short program, but How would I write a for loop to access a different sheet each time. This is what I have For Coun = 1 To Vio_Num Sheets("?").PageSetup.PrintArea = "$A$1:$L$45" The ? is where I need the incementing value to go. Is this possible? |
|
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Printing
Thank both of you for the help.
"Tom Ogilvy" wrote: Sub AAAA() Vio_Num = 3 For Coun = 1 To Vio_Num Sheets(Coun).Activate ActiveSheet.PageSetup.PrintArea = "$A$1:$L$45" Next End Sub -- Regards, Tom Ogilvy "Brent" wrote in message ... I am trying to complete a macro that is linked to a button to print multiple sheets from a workbook. The macro is intended to read a number from the first sheet to determine how many sheets to print. This should be a short program, but How would I write a for loop to access a different sheet each time. This is what I have For Coun = 1 To Vio_Num Sheets("?").PageSetup.PrintArea = "$A$1:$L$45" The ? is where I need the incementing value to go. Is this possible? |
|
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Printing
Is there a way to use the command
Worksheets("Sheet?").PageSetup.PrintArea...... Where ? increments. Or some function that would print consecutive sheets through the for loop? |
|
#6
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Printing
Worksheets("Sheet" & Coun).PageSetup.PrintArea
-- Jim "Brent" wrote in message ... | Is there a way to use the command | | Worksheets("Sheet?").PageSetup.PrintArea...... | | Where ? increments. Or some function that would print consecutive sheets | through the for loop? |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Excel 2003 printing problem--printing 1 document on 2 pages | Excel Discussion (Misc queries) | |||
| Excel Printing --Borders are not printing on the same page as data | Excel Discussion (Misc queries) | |||
| Printing a heading on each new page when printing | Excel Discussion (Misc queries) | |||
| Enable Double sided printing contiuously when printing multiple s. | Excel Discussion (Misc queries) | |||
| Printing? Worksheets not printing the same on multiple pc's! | Excel Programming | |||
Linear Mode
