Hi There,

Is there an option in Excel to print only the first page of all the
worksheets in the workbook.

Kind Regards
Rajula

You could run a little macro:

Option Explicit
Sub testme()

Dim wks As Worksheet
For Each wks In ActiveWorkbook.Worksheets
wks.PrintOut from:=1, to:=1, preview:=True
Next wks

End Sub


If you're new to macros, you may want to read David McRitchie's intro at:
http://www.mvps.org/dmcritchie/excel/getstarted.htm

Rajula wrote:

Hi There,

Is there an option in Excel to print only the first page of all the
worksheets in the workbook.

Kind Regards
Rajula

--

Dave Peterson

First of all Thankyou Very much..It works fine..
Can i avoid the print preview & send it directly to the printer.

I have no clue about macros & VB..



"Dave Peterson" wrote:

You could run a little macro:

Option Explicit
Sub testme()

Dim wks As Worksheet
For Each wks In ActiveWorkbook.Worksheets
wks.PrintOut from:=1, to:=1, preview:=True
Next wks

End Sub


If you're new to macros, you may want to read David McRitchie's intro at:
http://www.mvps.org/dmcritchie/excel/getstarted.htm

Rajula wrote:

Hi There,

Is there an option in Excel to print only the first page of all the
worksheets in the workbook.

Kind Regards
Rajula

--

Dave Peterson

Just delete this portion:

", preview:=True"

I like to save a few trees when I'm testing.



Rajula wrote:

First of all Thankyou Very much..It works fine..
Can i avoid the print preview & send it directly to the printer.

I have no clue about macros & VB..

"Dave Peterson" wrote:

You could run a little macro:

Option Explicit
Sub testme()

Dim wks As Worksheet
For Each wks In ActiveWorkbook.Worksheets
wks.PrintOut from:=1, to:=1, preview:=True
Next wks

End Sub


If you're new to macros, you may want to read David McRitchie's intro at:
http://www.mvps.org/dmcritchie/excel/getstarted.htm

Rajula wrote:

Hi There,

Is there an option in Excel to print only the first page of all the
worksheets in the workbook.

Kind Regards
Rajula

--

Dave Peterson


--

Dave Peterson

It was just perfect..
Thanks again.

"Dave Peterson" wrote:

Just delete this portion:

", preview:=True"

I like to save a few trees when I'm testing.



Rajula wrote:

First of all Thankyou Very much..It works fine..
Can i avoid the print preview & send it directly to the printer.

I have no clue about macros & VB..

"Dave Peterson" wrote:

You could run a little macro:

Option Explicit
Sub testme()

Dim wks As Worksheet
For Each wks In ActiveWorkbook.Worksheets
wks.PrintOut from:=1, to:=1, preview:=True
Next wks

End Sub


If you're new to macros, you may want to read David McRitchie's intro at:
http://www.mvps.org/dmcritchie/excel/getstarted.htm

Rajula wrote:

Hi There,

Is there an option in Excel to print only the first page of all the
worksheets in the workbook.

Kind Regards
Rajula

--

Dave Peterson


--

Dave Peterson

Hi,

In extention to the same problem.
This file is being used by people sitting in the US & UK. People in the US
use A3 size paper for printing.

What is the code for printing in A3 format if the file is getting printed
form US & A4 size if the file is getting printed from UK.

Regards


"Rajula" wrote:

It was just perfect..
Thanks again.

"Dave Peterson" wrote:

Just delete this portion:

", preview:=True"

I like to save a few trees when I'm testing.



Rajula wrote:

First of all Thankyou Very much..It works fine..
Can i avoid the print preview & send it directly to the printer.

I have no clue about macros & VB..

"Dave Peterson" wrote:

You could run a little macro:

Option Explicit
Sub testme()

Dim wks As Worksheet
For Each wks In ActiveWorkbook.Worksheets
wks.PrintOut from:=1, to:=1, preview:=True
Next wks

End Sub


If you're new to macros, you may want to read David McRitchie's intro at:
http://www.mvps.org/dmcritchie/excel/getstarted.htm

Rajula wrote:

Hi There,

Is there an option in Excel to print only the first page of all the
worksheets in the workbook.

Kind Regards
Rajula

--

Dave Peterson


--

Dave Peterson