Удалить колонтитулы в Word 2003 - MS Word

[beegl]

Как Удалить Все колонтитулы в Word 2003?

[Ципихович Эндрю]

'удаление содержимого колонтитулов
Dim Колонтитул As Word.HeaderFooter
Dim Раздел As Word.Section

    For Each Раздел In ActiveDocument.Sections
    'Удаление содержимого всех видов верхнего колонтитула
    'Headers - Заголовки
    For Each Колонтитул In Раздел.Headers
        'удаляем
        'Колонтитул.Range.Delete
        Колонтитул.Range.Font.Hidden = True
    Next Колонтитул
    'Удаление содержимого всех видов нижнего колонтитула
    'Footers - Нижние колонтитулы
    For Each Колонтитул In Раздел.Footers
        'удаляем
        'Колонтитул.Range.Delete
        'делаем скрытым
        Колонтитул.Range.Font.Hidden = True
    Next Колонтитул
    Next Раздел