Удалить разрыв раздела перед таблицей

Busine2009 · 22 авг 2009, 14:40

Добрый день!
Не подскажите, как можно удалить c помощью VBA разрыв раздела, представленный в файле. На словах тяжело объяснить.
Заранее спасибо.
--------------------------------------------------------------------------------
Добавлено сообщение
--------------------------------------------------------------------------------
Вот такой код придумал. Кому нравится?

Код: Выделить всё

Sub main()
Application.ScreenUpdating = False
Selection.WholeStory
With Selection.Find
.ClearFormatting
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
.Text = "^b"
.Execute
.Text = ""
End With
Selection.Delete
Application.ScreenUpdating = True
End Sub

Всем спасибо, все свободны.