|
|
|
Перенос строк в Excel нужна помощь
|
|||
|---|---|---|---|
|
#18+
Подскажите плиз, каким образом можно выводить на странице в 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. Заранее огромное мерси. Как это можно сделать??? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 18.12.2007, 15:31 |
|
||
|
Перенос строк в Excel нужна помощь
|
|||
|---|---|---|---|
|
#18+
Вставить разделитель страницы после каждой 20-й страницы ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 18.12.2007, 17:34 |
|
||
|
|

start [/forum/search_topic.php?author=csvik&author_mode=last_posts&do_search=1]: |
0ms |
get settings: |
11ms |
get forum list: |
19ms |
get settings: |
9ms |
get forum list: |
15ms |
get settings: |
10ms |
get forum list: |
17ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
85ms |
get topic data: |
13ms |
get forum data: |
3ms |
get page messages: |
58ms |
get tp. blocked users: |
2ms |
| others: | 1064ms |
| total: | 1314ms |

| 0 / 0 |
