Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Использовать Excel как библиотеку функций из любых Ваших приложений! / 4 сообщений из 4, страница 1 из 1
04.03.2005, 22:46:22
    #32947476
kanalex
kanalex
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Использовать Excel как библиотеку функций из любых Ваших приложений!
Наткнулся тут на интересную возможность.
В Excel есть контейнер worksheetfunction, который содержит многие функции доступные для использования в ячейках Листа.
Так вот можно через OLE использовать эту возможность в любом Вашем приложении.
Вот пример для Access:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
Function aaa(A As Integer) As String
'Возвращаем число преобразованное из арабского вида в римское.
Dim xl As Object

    Set xl = CreateObject("Excel.Sheet")
    xl.Application.Workbooks.Add
    
    aaa = xl.Application.worksheetfunction.Roman(A,  0 )
    xl.Close
    
End Function
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.03.2005, 10:08:00
    #32947753
marvan
marvan
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Использовать Excel как библиотеку функций из любых Ваших приложений!
жаль только скорость черепашья.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.03.2005, 02:50:19
    #32949372
kanalex
kanalex
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Использовать Excel как библиотеку функций из любых Ваших приложений!
marvanжаль только скорость черепашья.

Может у меня машина шустрая, но особых тормозов не заметно:)
Есть операции внутри Экселя, которые выполняются с заметными тормозами - например форматирование листов для печати (из макросов).
А данный пример отрабатывается даже меньше секунды...
Вообщем, смотря с чем сравнивать.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.03.2005, 00:18:56
    #32950269
kanalex
kanalex
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Использовать Excel как библиотеку функций из любых Ваших приложений!
Вот, кстати, и количественные показатели скорости:

при первом запуске приведенный выше код отрабатывает за 1,249994 сек,
при последующих - за 0,2... с хвостиком.

Машина АМД-Athlon 1200+/512M/Win XP SP1/Excel XP/Access 97
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Использовать Excel как библиотеку функций из любых Ваших приложений! / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 821ms
Закрыть
start [/forum/topic.php?fid=61&mobile=1&tid=2186185]:
 0ms
get settings:
 8ms
get forum list:
 17ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 507ms
get topic data:
 12ms
get forum data:
 3ms
get page messages:
 46ms
get tp. blocked users:
 2ms
others: 218ms
total:  821ms
x
x
Закрыть


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