Printing preselected pages in Excel 2003

[Johnnyboy5]

I want to be able to print some preselected pages - eg. page 1,
3,4,5, 7 in a workbook of 10 pages. I might need to change the
pages selected but am happy to edit the marco if anyone can write me
one.

Many thanks

John

Excel 2003.

 

[Claus Busch]

Hi John,

Am Thu, 9 Aug 2012 11:56:58 -0700 (PDT) schrieb Johnnyboy5:

I want to be able to print some preselected pages - eg. page 1,
3,4,5, 7 in a workbook of 10 pages. I might need to change the
pages selected but am happy to edit the marco if anyone can write me
one.

preselet your pages and run the macro:
Sub myPrint()
ExecuteExcel4Macro "PRINT(1,,,1,,,,,,,,2,,,TRUE,,FALSE)"
End Sub

Regards
Claus Busch

 

[Johnnyboy5]

Hi John,

Am Thu, 9 Aug 2012 11:56:58 -0700 (PDT) schrieb Johnnyboy5:


preselet your pages and run the macro:
Sub myPrint()
    ExecuteExcel4Macro "PRINT(1,,,1,,,,,,,,2,,,TRUE,,FALSE)"
End Sub

Regards
Claus Busch

Sorry I dont fully understand your response.

how do I "preselect pages" also not sure about the macro you wrote
there are a lot of ,,,,,,,,,,,, in it ,,,,,,,,,,,,,,

many thanks

John

 

[Claus Busch]

Hi John,

Am Fri, 10 Aug 2012 01:27:46 -0700 (PDT) schrieb Johnnyboy5:

how do I "preselect pages" also not sure about the macro you wrote
there are a lot of ,,,,,,,,,,,, in it ,,,,,,,,,,,,,,

in "Page Break Preview" you select your pages with pressed CTRL-Button,
then choose "Set Print Area" and run the macro

Sub myPrint()
ExecuteExcel4Macro "PRINT(1,,,1,,,,,,,,2,,,TRUE,,FALSE)"
End Sub

Regards
Claus Busch

 

[Johnnyboy5]

Hi John,

Am Fri, 10 Aug 2012 01:27:46 -0700 (PDT) schrieb Johnnyboy5:


in "Page Break Preview" you select your pages with pressed CTRL-Button,
then choose "Set Print Area" and run the macro

Sub myPrint()
ExecuteExcel4Macro "PRINT(1,,,1,,,,,,,,2,,,TRUE,,FALSE)"
End Sub

Got it now, many thanks

John