software

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 SubIf you're new to macros, you may want to read David McRitchie's intro at:
www.mvps.org/dmcritchie/excel/getstarted.htm

Rajula wrote:
gt;
gt; Hi There,
gt;
gt; Is there an option in Excel to print only the first page of all the
gt; worksheets in the workbook.
gt;
gt; Kind Regards
gt; Rajula

--

Dave Peterson

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

I have no clue about macros amp; VB..
quot;Dave Petersonquot; wrote:

gt; You could run a little macro:
gt;
gt; Option Explicit
gt; Sub testme()
gt;
gt; Dim wks As Worksheet
gt; For Each wks In ActiveWorkbook.Worksheets
gt; wks.PrintOut from:=1, to:=1, preview:=True
gt; Next wks
gt;
gt; End Sub
gt;
gt;
gt; If you're new to macros, you may want to read David McRitchie's intro at:
gt; www.mvps.org/dmcritchie/excel/getstarted.htm
gt;
gt; Rajula wrote:
gt; gt;
gt; gt; Hi There,
gt; gt;
gt; gt; Is there an option in Excel to print only the first page of all the
gt; gt; worksheets in the workbook.
gt; gt;
gt; gt; Kind Regards
gt; gt; Rajula
gt;
gt; --
gt;
gt; Dave Peterson
gt;

Just delete this portion:

quot;, preview:=Truequot;

I like to save a few trees when I'm testing.
Rajula wrote:
gt;
gt; First of all Thankyou Very much..It works fine..
gt; Can i avoid the print preview amp; send it directly to the printer.
gt;
gt; I have no clue about macros amp; VB..
gt;
gt; quot;Dave Petersonquot; wrote:
gt;
gt; gt; You could run a little macro:
gt; gt;
gt; gt; Option Explicit
gt; gt; Sub testme()
gt; gt;
gt; gt; Dim wks As Worksheet
gt; gt; For Each wks In ActiveWorkbook.Worksheets
gt; gt; wks.PrintOut from:=1, to:=1, preview:=True
gt; gt; Next wks
gt; gt;
gt; gt; End Sub
gt; gt;
gt; gt;
gt; gt; If you're new to macros, you may want to read David McRitchie's intro at:
gt; gt; www.mvps.org/dmcritchie/excel/getstarted.htm
gt; gt;
gt; gt; Rajula wrote:
gt; gt; gt;
gt; gt; gt; Hi There,
gt; gt; gt;
gt; gt; gt; Is there an option in Excel to print only the first page of all the
gt; gt; gt; worksheets in the workbook.
gt; gt; gt;
gt; gt; gt; Kind Regards
gt; gt; gt; Rajula
gt; gt;
gt; gt; --
gt; gt;
gt; gt; Dave Peterson
gt; gt;

--

Dave Peterson

It was just perfect..
Thanks again.

quot;Dave Petersonquot; wrote:

gt; Just delete this portion:
gt;
gt; quot;, preview:=Truequot;
gt;
gt; I like to save a few trees when I'm testing.
gt;
gt;
gt;
gt; Rajula wrote:
gt; gt;
gt; gt; First of all Thankyou Very much..It works fine..
gt; gt; Can i avoid the print preview amp; send it directly to the printer.
gt; gt;
gt; gt; I have no clue about macros amp; VB..
gt; gt;
gt; gt; quot;Dave Petersonquot; wrote:
gt; gt;
gt; gt; gt; You could run a little macro:
gt; gt; gt;
gt; gt; gt; Option Explicit
gt; gt; gt; Sub testme()
gt; gt; gt;
gt; gt; gt; Dim wks As Worksheet
gt; gt; gt; For Each wks In ActiveWorkbook.Worksheets
gt; gt; gt; wks.PrintOut from:=1, to:=1, preview:=True
gt; gt; gt; Next wks
gt; gt; gt;
gt; gt; gt; End Sub
gt; gt; gt;
gt; gt; gt;
gt; gt; gt; If you're new to macros, you may want to read David McRitchie's intro at:
gt; gt; gt; www.mvps.org/dmcritchie/excel/getstarted.htm
gt; gt; gt;
gt; gt; gt; Rajula wrote:
gt; gt; gt; gt;
gt; gt; gt; gt; Hi There,
gt; gt; gt; gt;
gt; gt; gt; gt; Is there an option in Excel to print only the first page of all the
gt; gt; gt; gt; worksheets in the workbook.
gt; gt; gt; gt;
gt; gt; gt; gt; Kind Regards
gt; gt; gt; gt; Rajula
gt; gt; gt;
gt; gt; gt; --
gt; gt; gt;
gt; gt; gt; Dave Peterson
gt; gt; gt;
gt;
gt; --
gt;
gt; Dave Peterson
gt;


Hi,

In extention to the same problem.
This file is being used by people sitting in the US amp; 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 amp; A4 size if the file is getting printed from UK.

Regardsquot;Rajulaquot; wrote:

gt; It was just perfect..
gt; Thanks again.
gt;
gt; quot;Dave Petersonquot; wrote:
gt;
gt; gt; Just delete this portion:
gt; gt;
gt; gt; quot;, preview:=Truequot;
gt; gt;
gt; gt; I like to save a few trees when I'm testing.
gt; gt;
gt; gt;
gt; gt;
gt; gt; Rajula wrote:
gt; gt; gt;
gt; gt; gt; First of all Thankyou Very much..It works fine..
gt; gt; gt; Can i avoid the print preview amp; send it directly to the printer.
gt; gt; gt;
gt; gt; gt; I have no clue about macros amp; VB..
gt; gt; gt;
gt; gt; gt; quot;Dave Petersonquot; wrote:
gt; gt; gt;
gt; gt; gt; gt; You could run a little macro:
gt; gt; gt; gt;
gt; gt; gt; gt; Option Explicit
gt; gt; gt; gt; Sub testme()
gt; gt; gt; gt;
gt; gt; gt; gt; Dim wks As Worksheet
gt; gt; gt; gt; For Each wks In ActiveWorkbook.Worksheets
gt; gt; gt; gt; wks.PrintOut from:=1, to:=1, preview:=True
gt; gt; gt; gt; Next wks
gt; gt; gt; gt;
gt; gt; gt; gt; End Sub
gt; gt; gt; gt;
gt; gt; gt; gt;
gt; gt; gt; gt; If you're new to macros, you may want to read David McRitchie's intro at:
gt; gt; gt; gt; www.mvps.org/dmcritchie/excel/getstarted.htm
gt; gt; gt; gt;
gt; gt; gt; gt; Rajula wrote:
gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt; Hi There,
gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt; Is there an option in Excel to print only the first page of all the
gt; gt; gt; gt; gt; worksheets in the workbook.
gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt; Kind Regards
gt; gt; gt; gt; gt; Rajula
gt; gt; gt; gt;
gt; gt; gt; gt; --
gt; gt; gt; gt;
gt; gt; gt; gt; Dave Peterson
gt; gt; gt; gt;
gt; gt;
gt; gt; --
gt; gt;
gt; gt; Dave Peterson
gt; gt;