Скорость формирования XLS / FoxPro, Visual FoxPro

ReSQL.ru

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

Гость

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

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

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

Цитировать

Написать

Автор*:

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

Тема*:

Сообщение

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

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

Автор:

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

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

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

Вложение:

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

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

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

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

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

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

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

Скорость формирования XLS

#35248030

12345вышелзайчикпогулять

Гость

Код: plaintext

1.
2.
3.
4.
5.
6.
7.

loEx = CREATEOBJECT("Excel.Application")
with loEX
  .Visible = .T.
  .range("A2").Value = ....
  ...
  .run(cMacros)
endwith

Код: plaintext

1.
2.
3.
4.
5.
6.
7.

loEx = CREATEOBJECT("Excel.Application")
with loEX
  .range("A2").Value = ....
  ...
  .run(cMacros)
  .Visible = .T.
endwith

влияет ли на скорость заполнения и выполнения макросов
.Visible = .T. ?

...

Рейтинг:

0 / 0

10.04.2008, 13:13

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

Скорость формирования XLS

#35248077

AleksMed

Участник

Откуда: Россия, Серпухов-Москва

Сообщения: 1 527

Рейтинг: 0 / 0

1. Можно померить на одних и тех же данных.
2. ИМХО. Да. На время отрисовки.

...

Рейтинг:

0 / 0

10.04.2008, 13:21

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

Скорость формирования XLS

#35248101

12345вышелзайчикпогулять

Гость

Код: plaintext

1.
2.
3.
4.
5.
6.
7.

loEx = CREATEOBJECT("Excel.Application")
with loEX
  .range("A2").Value = ....
  ...
  .run(cMacros)
  .Visible = .T.
endwith

т.е. выбираем этот вариант??

мне было заявлено, что
если показать ексель и заливать, то скорость увеличивается на порядок

...

Рейтинг:

0 / 0

10.04.2008, 13:27

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

Скорость формирования XLS

#35248131

PaulWist

Участник

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

Рейтинг: 0 / 0

12345вышелзайчикпогулять

мне было заявлено, что
если показать ексель и заливать, то скорость увеличивается на порядок

Врут.

...

Рейтинг:

0 / 0

10.04.2008, 13:35

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

Скорость формирования XLS

#35248135

Kruchinin Pahan

Участник

Откуда: Екатеринбург

Сообщения: 926

Рейтинг: 0 / 0

12345вышелзайчикпогулять
мне было заявлено, что
если показать ексель и заливать, то скорость увеличивается на порядок
В общем случае, как я заметил, скорость из-за отрисовки падает, причем значительно. Но был какой-то момент (Copy/Paste, если не ошибаюсь), когда показываешь excel, насильно выводишь на фокус и работает быстрее.

...

Рейтинг:

0 / 0

10.04.2008, 13:36

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

Скорость формирования XLS

#35248246

12345вышелзайчикпогулять

Гость

ок,
спасибо

...

Рейтинг:

0 / 0

10.04.2008, 13:56

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

Скорость формирования XLS

#35248345

piva

Участник

Откуда: Курган

Сообщения: 695

Рейтинг: 0 / 0

малюсенький прирост дает установка interactive=.F.
у меня при 500 строках давал прирост 0.3 сек

...

Рейтинг:

0 / 0

10.04.2008, 14:14

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

Скорость формирования XLS

#35248372

piva

Участник

Откуда: Курган

Сообщения: 695

Рейтинг: 0 / 0

Calculation еще влияет, если по ходу запихивания сами не ссылаетесь на результат вычисления

Код: plaintext

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.

o=CreateObject("Excel.Application")
o.EnableEvents=.F.
o.Interactive=.F.
o.DisplayALerts=.F.
w=o.WorkBooks.Add()

*o.Calculation=  2   && xlCalculationSemiautomatic 
o.Calculation= - 4135   && xlCalculationManual 

timer=Seconds()

With w
	With .ActiveSheet
		For i= 1  to  1000 
			.Cells(i, 1 ).Value=i
		next
	EndWith 
EndWith 

o.Calculation= - 4105   && xlCalculationAutomatic 
o.Calculate()
o.Interactive=.t.

? Seconds()-timer
o.quit

...

Рейтинг:

0 / 0

10.04.2008, 14:21

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

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

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

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

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

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

start [/forum/topic.php?fid=41&msg=35248077&tid=1587905]:	0ms
get settings:	7ms
get forum list:	13ms
check forum access:	2ms
check topic access:	2ms
track hit:	45ms
get topic data:	8ms
get forum data:	2ms
get page messages:	48ms
get tp. blocked users:	1ms
others:	228ms

total:	356ms

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