Удалить пробелы между таблицами документа чтоб объединить их

Вход

Регистрация

Напомнить пароль

= Мир MS Excel/Удалить пробелы между таблицами документа чтоб объединить их - Мир MS Excel

Старая форма входа

Страница 1 из 1 1
Модератор форума: _Boroda_, китин

Удалить пробелы между таблицами документа чтоб объединить их

Gjlhzl

Дата: Пятница, 06.09.2024, 22:23 | Сообщение № 1

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 138

Репутация: 0 ±

Замечаний: 0% ±

Вечер добрый
нарыл макрос...
но че то ругается..
[vba]

Код

Sub AllignTables()

Dim oPara As Paragraph

For Each oPara In ActiveDocument.range.Paragraphs

        If Not oPara.range.Information(wdWithInTable) Then

            If Len(oPara.range) = 1 Then

                oPara.range.Style = "Normal"

                oPara.range.Delete

            End If

        End If

    Next oPara

End Sub

[/vba]

на [vba]

Код

oPara.range.Style = "Normal"

[/vba]

что означает? как что бы заработало

Ответить

Удалить пробелы между таблицами документа чтоб объединить их

Страница 1 из 1
1