Форум для экологов

Пожар, не бывает такого :) сохраните в docx и попробуйте еще раз

Лёха, бывает, не удаляет ворд между таблицами разрывы, ну или определенные версии ворда это не умеют - когда разрыв между текстовыми блоками - удаляет, а между таблицами - нет.

Пожар, у меня получается удалять все разрывы через макрос. Его также можно подключить на кнопку на панель быстрого доступа. Из предварительной подготовки ставлю абзацы между разделами которые не хочу объединять. Как добавить его в ворд можно поискать инструкции в сети.

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

Sub DelEndOfTableChars()
Dim tbl As Table
Dim itbl As Long
Selection.GoTo What:=wdGoToLine, Which:=wdGoToFirst
On Error Resume Next
For itbl = ActiveDocument.Tables.Count To 1 Step -1
    Set tbl = ActiveDocument.Tables(itbl)
    tbl.Range.Select
    Selection.Collapse Direction:=wdCollapseEnd
    Selection.Delete Unit:=wdCharacter, Count:=1
Next itbl
On Error GoTo 0
End Sub

nekulikov, даже не знаю что сказать((( радоваться или печалиться))) ничего не поняла((

DDim, выложите здесь отчет небольшой. возможно, что это другой тип разрыва

Лёха, мне проще сделать документ, чем идти в УПРЗА и отчет выводить - вот таблицы и разделы, заменой они не убираются.

А_ну_ка_удали.docx: (13.17 КБ) 154 скачивания

Пожар, вы этого текста не пугайтесь, я его тоже не понимаю, случайно нашел на просторах интернета. Вам главное найти понятную вам инструкцию по типу "как создать макрос в ворд" и приложенный выше текст использовать при его создании

nekulikov писал(а): 25 сен 2023, 14:12 Пожар, вы этого текста не пугайтесь, я его тоже не понимаю, случайно нашел на просторах интернета. Вам главное найти понятную вам инструкцию по типу "как создать макрос в ворд" и приложенный выше текст использовать при его создании

СПАСИБО, все работает, только что попробовал - макрос убирает разрывы между таблицами, в результате получается одна гигантская таблица в отчете, ее можно спокойно копировать хоть куда. Сшивает и альбомные таблицы и книжные таблицы в одну. Для удобства можно сделать отдельный файл без таблицы параметров ИЗАВ и отдельно для таблицы параметров, чтобы получились 2 таблицы - одна альбомная (для таблицы параметров), другая - книжная ориентация (для всего остального). Сделал кнопку на главной панели ворда и приклеил к ней этот макрос, очень удобно теперь получилось.

TRusT, если надо чтобы не сшивал какие-то разделы между собой, то поставьте перед этим разделом абзацы на enter, и в конце этого раздела, тогда он не объединит то что разделено этими абзацами

nekulikov писал(а): 25 сен 2023, 14:24 если надо чтобы не сшивал какие-то разделы между собой, то поставьте перед этим разделом абзацы на enter, и в конце этого раздела, тогда он не объединит то что разделено этими абзацами

да, проверил, работает, только альбомные страницы он при этом запихивает в "книжные", но думаю для нужд копирования в другие программы это не помеха, в них уже вручную можно подправить ориентацию альбомных листов

Форум для экологов

[УПРЗА 4] Общие вопросы

Re: [УПРЗА 4] Общие вопросы

Re: [УПРЗА 4] Общие вопросы

Re: [УПРЗА 4] Общие вопросы

Re: [УПРЗА 4] Общие вопросы

Re: [УПРЗА 4] Общие вопросы

Re: [УПРЗА 4] Общие вопросы

Re: [УПРЗА 4] Общие вопросы

Re: [УПРЗА 4] Общие вопросы

Re: [УПРЗА 4] Общие вопросы

Re: [УПРЗА 4] Общие вопросы