Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Перенос строк в Excel нужна помощь / 3 сообщений из 3, страница 1 из 1
18.12.2007, 15:31
    #35017932
masterNike
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Перенос строк в Excel нужна помощь
Подскажите плиз, каким образом можно выводить на странице в Excel заданное кол-во строк.
Как описать это условие???

Нужен механизм, типа если кол-во вставляемых в Excel строк >= 20, то остальные строки переносить на след страницу.


Как в этом примере.
Тут строки вставляются на основной лист Layout из RawData.

For i = 1 To RowsCount
Sheets("Layout").Range("A" + CStr(i + 37)).Value = Sheets("RawData").Range("A" + CStr(i))
Next

Затем вставляется табличка Footer в конце всех выводимых строк.

Application.GoTo Reference:="Footer"
Selection.Copy
Sheets("Layout").Select
Range("A" + CStr(RowsCount + 38)).Select
ActiveSheet.Paste


Как в этом примере.

Поэтому если кол-во строк меньше 20 то проблем никаких, а если больше, например 150, то идет вставка строк на несколких страницах и в конце таблицка Footer.
А нужно втавлять на страницу в Layout всего 20 записей и потом Footer.

Заранее огромное мерси.
Как это можно сделать???
...
Рейтинг: 0 / 0
18.12.2007, 17:34
    #35018502
V.Kim
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Перенос строк в Excel нужна помощь
Вставить разделитель страницы после каждой 20-й страницы
...
Рейтинг: 0 / 0
18.12.2007, 17:43
    #35018540
masterNike
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Перенос строк в Excel нужна помощь
А если не секрет какой???
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Перенос строк в Excel нужна помощь / 3 сообщений из 3, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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