Тема: Колонтитулы
Подскажите, как убрать колонтитулы совсем-совсем. Чтобы даже полей от них не осталось. На данный момент висит знак абзаца в верхнем и нижнем колонтитулах. Как избавиться - хз.
Sub deleteAllHeaders_Footers()
Dim sec As Section
Dim hf As HeaderFooter
Dim rng As Range
For Each sec In ActiveDocument.Sections
For Each hf In sec.Headers
hf.Range.Delete
Next hf
For Each hf In sec.Footers
hf.Range.Delete
Next hf
Next sec
End Sub
Удалял данным макросом, но он убрал только текст. Сами поля остались висеть.