Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 1,090
Default Printing Anomaly

Excel 2002, WinXP
I'm printing from a number of sheets and placing the print code within a
With/End With construct. With each sheet I need the printed page sequence
to be the last page first, so I'm using the Excel4 code as follows:
Sub PrintBwd()
With Sheets("PrintLtr")
.PageSetup.PrintArea = RngToPrint.Address
NumPages = ExecuteExcel4Macro("GET.DOCUMENT(50)")
For Page = NumPages To 1 Step -1
.PrintOut from:=Page, To:=Page
Next Page
End With
End Sub

I'm getting erratic printing output which appears to be driven by which
sheet is the active sheet. Specifically, the printing output is one or two
pages short except when the sheeet to be printed is the active sheet. I
have checked and re-checked my code and it all appears to be proper. The
only wild card for me is the Excel4Macro about which I know nothing other
than how to use it.
My question: What sheet does the Excel4 macro operate on?
Thanks for your help and time. Otto


  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 35,218
Default Printing Anomaly

You could just activate that sheet and be happy <bg.

or...

NumPages = ExecuteExcel4Macro("get.document(50,""" & .Name & """)")

Otto Moehrbach wrote:

Excel 2002, WinXP
I'm printing from a number of sheets and placing the print code within a
With/End With construct. With each sheet I need the printed page sequence
to be the last page first, so I'm using the Excel4 code as follows:
Sub PrintBwd()
With Sheets("PrintLtr")
.PageSetup.PrintArea = RngToPrint.Address
NumPages = ExecuteExcel4Macro("GET.DOCUMENT(50)")
For Page = NumPages To 1 Step -1
.PrintOut from:=Page, To:=Page
Next Page
End With
End Sub

I'm getting erratic printing output which appears to be driven by which
sheet is the active sheet. Specifically, the printing output is one or two
pages short except when the sheeet to be printed is the active sheet. I
have checked and re-checked my code and it all appears to be proper. The
only wild card for me is the Excel4Macro about which I know nothing other
than how to use it.
My question: What sheet does the Excel4 macro operate on?
Thanks for your help and time. Otto


--

Dave Peterson
  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 1,090
Default Printing Anomaly

Dave
You have come through again. I was looking at activating each sheet in
turn and my OP has some 160 sheets. Thanks for your help and your time.
Otto
"Dave Peterson" wrote in message
...
You could just activate that sheet and be happy <bg.

or...

NumPages = ExecuteExcel4Macro("get.document(50,""" & .Name & """)")

Otto Moehrbach wrote:

Excel 2002, WinXP
I'm printing from a number of sheets and placing the print code within a
With/End With construct. With each sheet I need the printed page
sequence
to be the last page first, so I'm using the Excel4 code as follows:
Sub PrintBwd()
With Sheets("PrintLtr")
.PageSetup.PrintArea = RngToPrint.Address
NumPages = ExecuteExcel4Macro("GET.DOCUMENT(50)")
For Page = NumPages To 1 Step -1
.PrintOut from:=Page, To:=Page
Next Page
End With
End Sub

I'm getting erratic printing output which appears to be driven by which
sheet is the active sheet. Specifically, the printing output is one or
two
pages short except when the sheeet to be printed is the active sheet. I
have checked and re-checked my code and it all appears to be proper. The
only wild card for me is the Excel4Macro about which I know nothing other
than how to use it.
My question: What sheet does the Excel4 macro operate on?
Thanks for your help and time. Otto


--

Dave Peterson



Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Formula anomaly Bob Excel Worksheet Functions 7 February 8th 10 02:03 AM
Combo Box Anomaly Garyw Excel Discussion (Misc queries) 2 June 23rd 08 09:03 PM
Sort anomaly supersheet Excel Worksheet Functions 0 August 28th 07 06:57 PM
VLOOKUP Anomaly Tosca Excel Worksheet Functions 6 May 8th 05 09:08 AM
Counta anomaly stimpy[_2_] Excel Programming 1 July 10th 03 06:54 PM


All times are GMT +1. The time now is 01:15 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"