Set PageSetup = Nothing????

MrExcel · Mar 26th, 2002, 07:42 PM

I've got a complex VBA application. The thing runs really fast. Until I print the worksheet.

After printing the worksheet, the pagebreaks lines appear and the code runs at least 10 times slower than without the pagebreak lines.

The *right* thing to do is to figure out why this is happening, but the *quick* thing I am trying to do (spring break starts in 3 days) is to find a way to basically set the PageSetup to nothing. Friends who have an international version of Excel suggested

Set ActiveSheet.PageSetup = Nothing

but this causes an object 438 error for me in Excel 2000 or Excel 2002.

Any idea on how to "undo" the page setup settings so that this application can go back to it's speedy performance after printing?

Bill

Dave Hawley · Mar 26th, 2002, 07:46 PM

Hi Bill

Try:

ActiveSheet.DisplayAutomaticPageBreaks = False

To get rid of those horrible page breaks.

Where should I post the invoice?

)

Exactement · Mar 26th, 2002, 08:07 PM

I think this should also work :-

Cells.PageBreak = xlNone

RichardS · Mar 26th, 2002, 08:16 PM

I don't know VB, but what about
ActiveSheet.ResetAllPageBreaks
Richard

Mar 26th, 2002, 07:42 PM	#1
MrExcel . Join Date: Feb 2002 Location: Akron, Ohio USA Posts: 789	I've got a complex VBA application. The thing runs really fast. Until I print the worksheet. After printing the worksheet, the pagebreaks lines appear and the code runs at least 10 times slower than without the pagebreak lines. The right thing to do is to figure out why this is happening, but the quick thing I am trying to do (spring break starts in 3 days) is to find a way to basically set the PageSetup to nothing. Friends who have an international version of Excel suggested Set ActiveSheet.PageSetup = Nothing but this causes an object 438 error for me in Excel 2000 or Excel 2002. Any idea on how to "undo" the page setup settings so that this application can go back to it's speedy performance after printing? Bill __________________ Preview my latest book for Free

Thread Tools
Show Printable Version Email this Page
Display Modes
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode

Mar 26th, 2002, 07:46 PM	#2
Dave Hawley Banned Join Date: Feb 2002 Posts: 1,582	Hi Bill Try: ActiveSheet.DisplayAutomaticPageBreaks = False To get rid of those horrible page breaks. Where should I post the invoice? )

Mar 26th, 2002, 08:07 PM	#3
Exactement New Member Join Date: Mar 2002 Posts: 4	I think this should also work :- Cells.PageBreak = xlNone

Mar 26th, 2002, 08:16 PM	#4
RichardS Board Regular Join Date: Feb 2002 Location: Victoria, Australia Posts: 761	I don't know VB, but what about ActiveSheet.ResetAllPageBreaks Richard