опять Exel / FoxPro, Visual FoxPro

ReSQL.ru

Мобильная версия Контакт Правила FAQ Помощь

Гость

Войти | Регистрация | Профиль | Очистить

Новые сообщения | Избранное

Форумы | Пользователи | Статистика | Мод. лог | Поиск

Цитировать

Написать

Автор*:

Ввести пароль для входа

Тема*:

Сообщение

Данное сообщение тематическое

Сообщение содержит картинки или видео 18+

Автор:

ВНИМАНИЕ! На данном подфоруме действуют строгие правила. Удостоверьтесь, что ваше сообщение соответствует им!

Форум или тема закрыты для гостей. Необходима авторизация!

Загрузить последнюю сохраненную версию

Вложение:

Вставить как галерею

Максимальный размер вложений: 4,0 МБ, аудио/видео: 8,0 МБ. Картинки большего размера ужимаются, если возможно.

Введите код, изображенный на картинке. Если код нечитаемый, кликните картинку, чтобы загрузить другой вариант.

Отправляя сообщение, я выражаю свое согласие с правилами форума и принимаю пользовательское соглашение.

Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр

Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / опять Exel

5 сообщений из 5, страница 1 из 1

опять Exel

#33350702

GoshaS

Участник

Откуда: юг Архангельской обл.

Сообщения: 391

Рейтинг: 0 / 0

*С foxclub.ru взял пример работы с Exel-ем от В.Максимова
* Создаем объект Excel

Код: plaintext

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.

LOCAL loExcel as Excel.Application 
loExcel=CREATEOBJECT('Excel.Application')
* Создаем новую рабочую книгу
loExcel.Visible= .T.
LOCAL loBook as Excel.Workbook 
#DEFINE xlWBATWorksheet - 4167 
loBook = m.loExcel.workbooks.Add(xlWBATWorksheet)
* Создаем ссылку на новый лист рабочей книги
LOCAL loSheet as Excel.Worksheet 
loSheet = m.loBook.Sheets( 1 )

Все чудесно работает, однако можно ли создать еще один лист, в который надо поместить другой отчет.
Если создаю книгу с кол-вом листов по умолчанию:
[/src]loBook = m.loExcel.workbooks.Add.Sheets()
[/src]тогда не могу создать ссылку на лист рабочей книги, выдает ошибку.

...

Рейтинг:

0 / 0

28.10.2005, 18:12:37

| Ответить | Цитировать | Написать

опять Exel

#33350936

ВладимирМ

Участник

Откуда: г. Москва

Сообщения: 7 937

Рейтинг: 0 / 0

В Excel другая логика.

Создать новую рабочую книгу с количеством листов по умолчанию:

Код: plaintext

loBook = m.loExcel.workbooks.Add()

Далее надо проверить, а сколько же листов в этой новой книге.

Код: plaintext

LOCAL lnSheetsCount, lnSheetsNeed
lnSheetsCount = m.loBook.Sheets.count

И вот если в этой новой книге количество листов отлично от 0, то получаем ссылку на нужный лист

Код: plaintext

LOCAL loSheet as Excel.Worksheet 
loSheet = m.loBook.Sheets( 1 )

Если же надо именно создать новый лист в текущей рабочей книге (файле Excel), то это делается так:

Код: plaintext

* Вставка одного листа ПЕРЕД ТЕКУЩИМ листом
loSheet = m.loBook.Sheets.Add()

Если надо сделать вставку нового листа, например, после последнего листа, то

Код: plaintext

1.
2.
3.
4.

* Количество листов
LOCAL lnSheetsCount
lnSheetsCount = m.loBook.Sheets.count

loSheet = m.loBook.Sheets.Add(NULL, m.loBook.Sheets(m.lnSheetsCount),  1 )

Последний параметр - это сколько листов надо вставить. В данном случае - 1.

...

Рейтинг:

0 / 0

28.10.2005, 20:46:23

| Ответить | Цитировать | Написать

опять Exel

#33350988

GoshaS

Участник

Откуда: юг Архангельской обл.

Сообщения: 391

Рейтинг: 0 / 0

Огромное спасибо.
Еще бы собрать все в
http://forum.foxclub.ru/list.php?f=32
:))

...

Рейтинг:

0 / 0

28.10.2005, 22:13:08

| Ответить | Цитировать | Написать

опять Exel

#33351492

Igor Korolyov

Участник

Откуда: Гомель, Беларусь

Сообщения: 2 520

Рейтинг: 0 / 0

Hi GoshaS!

Не надо там "всё" - для этого в частности есть поиск по форуму, читать же
многостраничный (хелп по программированию Excel это пожалуй не одна сотня
страниц будет) документ никто не станет... Да впрочем и писать "про всё"
Владимир конечно тоже не станет - т.к. это дурная и ненужная работа - для
этого есть собственно хелп по VBA - о чём кстати Владимир упомянул.

Posted via ActualForum NNTP Server 1.3

...

Рейтинг:

0 / 0

30.10.2005, 02:02:26

| Ответить | Цитировать | Написать

опять Exel

#33354146

GoshaS

Участник

Откуда: юг Архангельской обл.

Сообщения: 391

Рейтинг: 0 / 0

Igor Korolyov
Hi GoshaS!

Не надо там "всё" - для этого в частности есть поиск по форуму, читать же
многостраничный (хелп по программированию Excel это пожалуй не одна сотня
страниц будет) документ никто не станет... Да впрочем и писать "про всё"
Владимир конечно тоже не станет - т.к. это дурная и ненужная работа - для
этого есть собственно хелп по VBA - о чём кстати Владимир упомянул.

Posted via ActualForum NNTP Server 1.3
Имеется в виду - все выше написанное объяснение. Или хотя бы ссылку выложить в http://forum.foxclub.ru/list.php?f=32
Тем конечно в формуме по Excel тьма, только все об одном. Хотя понравилась еще ветка по ускорению записи в Excel

...

Рейтинг:

0 / 0

31.10.2005, 20:47:56

| Ответить | Цитировать | Написать

5 сообщений из 5, страница 1 из 1

Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / опять Exel

Читали тему (0):

Читали форум (0):

Пользователи онлайн (0):

start [/forum/topic.php?fid=41&msg=33351492&tid=1593153]:	0ms
get settings:	10ms
get forum list:	22ms
check forum access:	3ms
check topic access:	3ms
track hit:	61ms
get topic data:	10ms
get forum data:	3ms
get page messages:	41ms
get tp. blocked users:	1ms
others:	243ms

total:	397ms

	Необходимые cookie
	Cookie для сбора статистики
	Cookie для маркетинга и рекламы