Page Break Preview

GeorgeB · Feb 22nd, 2002, 09:01 PM

I recorded a Macro to adjust the page breaks.

Sub Macro2()
' Macro2 Macro

ActiveWindow.SelectedSheets.PrintPreview
ActiveSheet.PageSetup.PrintArea = "$A$1:$H$25"
ActiveWindow.SelectedSheets.PrintPreview
End Sub

Try to run it and it stops at the Print Preview window. Click Page Break Preview and it continues and does the adjustment then goes back to Print Preview. You have to click on Normal View to get it to finish. What do you have to do to get to run all the way through???

Anne Troy · Feb 22nd, 2002, 09:13 PM

I'm not sure I understand the question. What is it exactly that you want to do? There are so many print settings in Excel that it's rarely necessary to set the print area unless you *must* keep other data on the same worksheet.

Could you give more detail? Thanks!

GeorgeB · Feb 22nd, 2002, 09:21 PM

I have a workbook with a sheet that gets copied many times. Somhow the print area got screwed up before I noticed. I don't want to go through the effort of manually adjusting every sheet if a Macro will do it. Any solutions??

Anne Troy · Feb 22nd, 2002, 09:33 PM

I guess I don't understand the point of print preview at all. Just take both of those lines out of your code and just use the print area line.

GeorgeB · Feb 22nd, 2002, 09:42 PM

Hey thanks Dreamboat. It works great. The Macro recorder put the print preview in and I didn't realize it was not necessary. Thanks again.
George

Feb 22nd, 2002, 09:13 PM	#2
Anne Troy MrExcel MVP Join Date: Feb 2002 Location: Allentown, PA Posts: 2,510	I'm not sure I understand the question. What is it exactly that you want to do? There are so many print settings in Excel that it's rarely necessary to set the print area unless you must keep other data on the same worksheet. Could you give more detail? Thanks! __________________ ~Anne Troy

Feb 22nd, 2002, 09:33 PM	#4
Anne Troy MrExcel MVP Join Date: Feb 2002 Location: Allentown, PA Posts: 2,510	I guess I don't understand the point of print preview at all. Just take both of those lines out of your code and just use the print area line. __________________ ~Anne Troy

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

Feb 22nd, 2002, 09:01 PM	#1
GeorgeB Board Regular Join Date: Feb 2002 Location: Las Vegas Nevada USA Posts: 240	I recorded a Macro to adjust the page breaks. Sub Macro2() ' Macro2 Macro ActiveWindow.SelectedSheets.PrintPreview ActiveSheet.PageSetup.PrintArea = "$A$1:$H$25" ActiveWindow.SelectedSheets.PrintPreview End Sub Try to run it and it stops at the Print Preview window. Click Page Break Preview and it continues and does the adjustment then goes back to Print Preview. You have to click on Normal View to get it to finish. What do you have to do to get to run all the way through???

Feb 22nd, 2002, 09:21 PM	#3
GeorgeB Board Regular Join Date: Feb 2002 Location: Las Vegas Nevada USA Posts: 240	I have a workbook with a sheet that gets copied many times. Somhow the print area got screwed up before I noticed. I don't want to go through the effort of manually adjusting every sheet if a Macro will do it. Any solutions??

Feb 22nd, 2002, 09:42 PM	#5
GeorgeB Board Regular Join Date: Feb 2002 Location: Las Vegas Nevada USA Posts: 240	Hey thanks Dreamboat. It works great. The Macro recorder put the print preview in and I didn't realize it was not necessary. Thanks again. George