Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / MS Excel. Объединенные строки, целостность последних строк при печати/просмотри / 4 сообщений из 4, страница 1 из 1
01.11.2007, 18:26:34
    #34911289
Hammerok
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
MS Excel. Объединенные строки, целостность последних строк при печати/просмотри
В xls файле записи объединены из двух строк, последние записи при просмотре/печати делятся на строки.
Как вывести на просмотре/печати, чтобы последние записи были целые на всех страницах?
...
Рейтинг: 0 / 0
01.11.2007, 21:00:43
    #34911600
Taranaga
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
MS Excel. Объединенные строки, целостность последних строк при печати/просмотри
Пример нужен.
Так - непонятно...
...
Рейтинг: 0 / 0
01.11.2007, 21:31:44
    #34911622
Deggasad
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
MS Excel. Объединенные строки, целостность последних строк при печати/просмотри
1) не объединять ячейки
2) изменить границы страниц вручную
3) изменить границы страниц макросом. Тут уже конкретная задача, которую нужно решать применитьтельно к конкретному случаю и с учётом особенностей этого конкретного случая!
4) может я что-то упустил и решение попроще всё же есть....
...
Рейтинг: 0 / 0
02.11.2007, 00:53:50
    #34911755
tolikt
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
MS Excel. Объединенные строки, целостность последних строк при печати/просмотри
Deggasad прав.
Но реально только п.п. 2 и 3.
П. 1 нарушает обычно целостность таблицы.
П. 4, если решение и есть, то наверное, не для Excel.

По п. 2 нужно поискать по форуму: обсуждалось тут.
Алгоритм понятный: пройтись макросом по горизонтальным разрывам и проверить, не находится ли на них объединённая ячейка. Если есть, то вставить новый разрыв перед объединённой ячейкой.

Основная строка кода может выглядить примерно так (предполагается, что объединённые ячейки могут быть в столбце MyCol):
Код: plaintext
1.
If Cells(ActiveSheet.HPageBreaks(i).Location.Row, MyCol).MergeArea.Address = 
Cells(ActiveSheet.HPageBreaks(i).Location.Row -  1 , MyCol).MergeArea.Address Then

Грабли тут главные могут быть из-за жуткой глючности HPageBreaks. Но тоже можно обойти, тоже обсуждалось на форуме. Надо при включённом обновлении экрана после каждой вставки разрыва "передёрнуть" лист вверх-вниз.
Могут быть ещё нюансы.
...
Рейтинг: 0 / 0
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / MS Excel. Объединенные строки, целостность последних строк при печати/просмотри / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]