|
Действия ...
Новые сообщения [новые:0]
Дайджест
Горячие темы
Избранное [новые:0]
Форумы
Пользователи
Статистика
Статистика нагрузки
Мод. лог
Поиск
|
|
21.06.2007, 15:07
|
|||
|---|---|---|---|
|
|||
про создание новых листов в экселе |
|||
|
#18+
я создаю новые листы копируя второй лист m.loExcel.ActiveWorkbook.Sheets(2).Copy(null,m.loExcel.ActiveWorkbook.Sheets(m.lnSheetsCount)) у меня вновь созданный вставляется перед ранее созданным...что не удобно так как при распечатке листы лежат наоборот и их неудобно распечатывать... как сделать чтобы копируемые листы создавались в конец файла??? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
21.06.2007, 15:26
|
|||
|---|---|---|---|
|
|||
про создание новых листов в экселе |
|||
|
#18+
ну еще можно с помощьюю перемещения листа это решить...есть ли такая команда??? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
21.06.2007, 16:00
|
|||
|---|---|---|---|
|
|||
про создание новых листов в экселе |
|||
|
#18+
Запусти макрорекордер в Excel-e, скопируй и посмотри, что получится. Вопрос-то, не по FoxPro. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
21.06.2007, 16:38
|
|||
|---|---|---|---|
|
|||
про создание новых листов в экселе |
|||
|
#18+
у меня программа в фоксе работает, значит вопрос по фоксу....ну так что??? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
21.06.2007, 17:28
|
|||
|---|---|---|---|
про создание новых листов в экселе |
|||
|
#18+
Вот так : m.oexcel=CREATEOBJECTEX('excel.application','','') WITH m.oexcel WITH .workbooks.add WITH .worksheets m.maxsheet=.count && количество листов в книге m.kolsheet=10 && сколько листов вставлять .add(.null.,.parent.worksheets(m.maxsheet),m.kolsheet) ENDWITH ENDWITH .visible=.t. ENDWITH RELEASE m.oexcel ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
22.06.2007, 14:55
|
|||
|---|---|---|---|
|
|||
про создание новых листов в экселе |
|||
|
#18+
попробуй так: op1=Createobject("Excel.Application") op=op1.workbooks.add lnSheetsCount = m.op1.ActiveWorkbook.Sheets.count objExcelSheet=op.Sheets.add(null,m.op1.ActiveWorkbook.Sheets(m.lnSheetsCount),m.lnSheetsCount+1) objExcelSheet=op.Sheets.move(null,m.op1.ActiveWorkbook.Sheets(m.lnSheetsCount)) да и посмотри здесь: http://forum.foxclub.ru/read.php?29,273318 ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
start [/forum/topic.php?fid=41&tablet=1&tid=1589109]: |
0ms |
get settings: |
5ms |
get forum list: |
16ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
54ms |
get topic data: |
9ms |
get forum data: |
2ms |
get page messages: |
37ms |
get tp. blocked users: |
1ms |
| others: | 194ms |
| total: | 324ms |
| 0 / 0 |
