[N Morrison]

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.