| Home |
| Search |
| Today's Posts |
|
|
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Compile Error: With From:= << Highlighted
Sub PrintSkipP1()
Dim sht As Worksheet For Each sht In ActiveWindow.SelectedSheets sht.PrintPreview From:=2, To:=4 Next sht Set sht = Nothing End Sub WHY? |
|
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Compile Error: With From:= << Highlighted
Hi,
As far as I'm aware the only switches for .printpreview are True/False and the correct syntax is sht.PrintPreview (True) What are you attempting to do with the switch you are using? Mike "JMay" wrote: Sub PrintSkipP1() Dim sht As Worksheet For Each sht In ActiveWindow.SelectedSheets sht.PrintPreview From:=2, To:=4 Next sht Set sht = Nothing End Sub WHY? |
|
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Compile Error: With From:= << Highlighted
Thanks Mike,
Actually, I'm trying to create a Macro that will Skip the printing of my Page 1 of my Active 4 page printout (print only 2,3 and 4). For testing I always use the Preview option versus PrintOut (to save paper). Also - I actually want the To:= to be To:=[Pages] representing print to the last page (whatever number that is)... Thanks, Jim "Mike H" wrote: Hi, As far as I'm aware the only switches for .printpreview are True/False and the correct syntax is sht.PrintPreview (True) What are you attempting to do with the switch you are using? Mike "JMay" wrote: Sub PrintSkipP1() Dim sht As Worksheet For Each sht In ActiveWindow.SelectedSheets sht.PrintPreview From:=2, To:=4 Next sht Set sht = Nothing End Sub WHY? |
|
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Compile Error: With From:= << Highlighted
Hi,
I look to be corrected but I'm fairly sure you can only preview all pages. printout is different you can do this For Each sht In ActiveWindow.SelectedSheets sht.Printout From:=2, To:=4 Next sht Mike "JMay" wrote: Thanks Mike, Actually, I'm trying to create a Macro that will Skip the printing of my Page 1 of my Active 4 page printout (print only 2,3 and 4). For testing I always use the Preview option versus PrintOut (to save paper). Also - I actually want the To:= to be To:=[Pages] representing print to the last page (whatever number that is)... Thanks, Jim "Mike H" wrote: Hi, As far as I'm aware the only switches for .printpreview are True/False and the correct syntax is sht.PrintPreview (True) What are you attempting to do with the switch you are using? Mike "JMay" wrote: Sub PrintSkipP1() Dim sht As Worksheet For Each sht In ActiveWindow.SelectedSheets sht.PrintPreview From:=2, To:=4 Next sht Set sht = Nothing End Sub WHY? |
|
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Compile Error: With From:= << Highlighted
Final Code (seems a shame that we have to refer to Excel4Macro.... it get it
to work -- Is there a more current substitute?) Tks Mike Sub PrintSkipP1() Dim sht As Worksheet TotPages = Application.ExecuteExcel4Macro("GET.DOCUMENT(50)") For Each sht In ActiveWindow.SelectedSheets sht.PrintOut From:=2, To:=TotPages Next sht Set sht = Nothing End Sub "Mike H" wrote: Hi, I look to be corrected but I'm fairly sure you can only preview all pages. printout is different you can do this For Each sht In ActiveWindow.SelectedSheets sht.Printout From:=2, To:=4 Next sht Mike "JMay" wrote: Thanks Mike, Actually, I'm trying to create a Macro that will Skip the printing of my Page 1 of my Active 4 page printout (print only 2,3 and 4). For testing I always use the Preview option versus PrintOut (to save paper). Also - I actually want the To:= to be To:=[Pages] representing print to the last page (whatever number that is)... Thanks, Jim "Mike H" wrote: Hi, As far as I'm aware the only switches for .printpreview are True/False and the correct syntax is sht.PrintPreview (True) What are you attempting to do with the switch you are using? Mike "JMay" wrote: Sub PrintSkipP1() Dim sht As Worksheet For Each sht In ActiveWindow.SelectedSheets sht.PrintPreview From:=2, To:=4 Next sht Set sht = Nothing End Sub WHY? |
|
#6
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Compile Error: With From:= << Highlighted
Is there a more current substitute
Not that I know of I also use it here http://www.rondebruin.nl/print.htm#not -- Regards Ron de Bruin http://www.rondebruin.nl/tips.htm "JMay" wrote in message ... Final Code (seems a shame that we have to refer to Excel4Macro.... it get it to work -- Is there a more current substitute?) Tks Mike Sub PrintSkipP1() Dim sht As Worksheet TotPages = Application.ExecuteExcel4Macro("GET.DOCUMENT(50)") For Each sht In ActiveWindow.SelectedSheets sht.PrintOut From:=2, To:=TotPages Next sht Set sht = Nothing End Sub "Mike H" wrote: Hi, I look to be corrected but I'm fairly sure you can only preview all pages. printout is different you can do this For Each sht In ActiveWindow.SelectedSheets sht.Printout From:=2, To:=4 Next sht Mike "JMay" wrote: Thanks Mike, Actually, I'm trying to create a Macro that will Skip the printing of my Page 1 of my Active 4 page printout (print only 2,3 and 4). For testing I always use the Preview option versus PrintOut (to save paper). Also - I actually want the To:= to be To:=[Pages] representing print to the last page (whatever number that is)... Thanks, Jim "Mike H" wrote: Hi, As far as I'm aware the only switches for .printpreview are True/False and the correct syntax is sht.PrintPreview (True) What are you attempting to do with the switch you are using? Mike "JMay" wrote: Sub PrintSkipP1() Dim sht As Worksheet For Each sht In ActiveWindow.SelectedSheets sht.PrintPreview From:=2, To:=4 Next sht Set sht = Nothing End Sub WHY? |
|
#7
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Compile Error: With From:= << Highlighted
..printout has a preview parm:
sht.PrintOut preview:=True, From:=2, To:=999 (make 999 as big as you want to ensure that you got all the pages.) JMay wrote: Thanks Mike, Actually, I'm trying to create a Macro that will Skip the printing of my Page 1 of my Active 4 page printout (print only 2,3 and 4). For testing I always use the Preview option versus PrintOut (to save paper). Also - I actually want the To:= to be To:=[Pages] representing print to the last page (whatever number that is)... Thanks, Jim "Mike H" wrote: Hi, As far as I'm aware the only switches for .printpreview are True/False and the correct syntax is sht.PrintPreview (True) What are you attempting to do with the switch you are using? Mike "JMay" wrote: Sub PrintSkipP1() Dim sht As Worksheet For Each sht In ActiveWindow.SelectedSheets sht.PrintPreview From:=2, To:=4 Next sht Set sht = Nothing End Sub WHY? -- Dave Peterson |
|
#8
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Compile Error: With From:= << Highlighted
Hi Dave
(make 999 as big as you want to ensure that you got all the pages.) I believe this part To:=999 is not needed if I remember correct ? The OP can use sht.PrintOut preview:=True, From:=2 -- Regards Ron de Bruin http://www.rondebruin.nl/tips.htm "Dave Peterson" wrote in message ... .printout has a preview parm: sht.PrintOut preview:=True, From:=2, To:=999 (make 999 as big as you want to ensure that you got all the pages.) JMay wrote: Thanks Mike, Actually, I'm trying to create a Macro that will Skip the printing of my Page 1 of my Active 4 page printout (print only 2,3 and 4). For testing I always use the Preview option versus PrintOut (to save paper). Also - I actually want the To:= to be To:=[Pages] representing print to the last page (whatever number that is)... Thanks, Jim "Mike H" wrote: Hi, As far as I'm aware the only switches for .printpreview are True/False and the correct syntax is sht.PrintPreview (True) What are you attempting to do with the switch you are using? Mike "JMay" wrote: Sub PrintSkipP1() Dim sht As Worksheet For Each sht In ActiveWindow.SelectedSheets sht.PrintPreview From:=2, To:=4 Next sht Set sht = Nothing End Sub WHY? -- Dave Peterson |
|
#9
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Compile Error: With From:= << Highlighted
Thanks Both Dave and Ron --
So my lastest code (see under last comm to Mike) with Q is solved by "forgetting" the need for the To:= parameter? Coooooooool !!!!!!!!! "Ron de Bruin" wrote: Hi Dave (make 999 as big as you want to ensure that you got all the pages.) I believe this part To:=999 is not needed if I remember correct ? The OP can use sht.PrintOut preview:=True, From:=2 -- Regards Ron de Bruin http://www.rondebruin.nl/tips.htm "Dave Peterson" wrote in message ... .printout has a preview parm: sht.PrintOut preview:=True, From:=2, To:=999 (make 999 as big as you want to ensure that you got all the pages.) JMay wrote: Thanks Mike, Actually, I'm trying to create a Macro that will Skip the printing of my Page 1 of my Active 4 page printout (print only 2,3 and 4). For testing I always use the Preview option versus PrintOut (to save paper). Also - I actually want the To:= to be To:=[Pages] representing print to the last page (whatever number that is)... Thanks, Jim "Mike H" wrote: Hi, As far as I'm aware the only switches for .printpreview are True/False and the correct syntax is sht.PrintPreview (True) What are you attempting to do with the switch you are using? Mike "JMay" wrote: Sub PrintSkipP1() Dim sht As Worksheet For Each sht In ActiveWindow.SelectedSheets sht.PrintPreview From:=2, To:=4 Next sht Set sht = Nothing End Sub WHY? -- Dave Peterson |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| help with this error-Compile error: cant find project or library | Excel Discussion (Misc queries) | |||
| VBAProject name compile error, not defined at compile time | Excel Programming | |||
| error message: compile error, argument not optional | Excel Programming | |||
| How do I get rid of "Compile error in hidden module" error message | Excel Discussion (Misc queries) | |||
Hybrid Mode
