Home |
Search |
Today's Posts |
|
#1
Posted to microsoft.public.word.formatting.longdocs
|
|||
|
|||
Can't change page size; saying margins are too large
I used this to find the corrupt sections:
-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+- +-+ Sub FindProblems() ' ' FindProblems Macro ' Macro written 11/09/2010 by N. Morrison ' Dim MySection As Section On Error GoTo ErrorHandler ' Enable error-handling routine. For Each MySection In ActiveDocument.Sections With MySection.PageSetup .TextColumns.SetCount (2) .TextColumns.EvenlySpaced = True .TextColumns.SetCount (1) End With Next Exit Sub ErrorHandler: ' Error-handling routine. Debug.Print MySection.Index Selection.GoTo What:=wdGoToSection, Which:=wdGoToFirst, Count:=MySection.Index, Name:="" Exit Sub End Sub -+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+- +-+ but in the end it was easier to convert each section break to a manual new page. That enabled all of the options. |
Reply |
Thread Tools | |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Change paper size; Word changes to invalid margins | New Users | |||
How do I create large page size documents that print on standard . | Page Layout | |||
Margins too Large for the Page Width | Page Layout | |||
Weird Margins/Page Size | Page Layout | |||
Large BOTTOM Page Margins | Page Layout |