powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Использование пользовательских функций Excel в Access или создание библиотеки
6 сообщений из 6, страница 1 из 1
Использование пользовательских функций Excel в Access или создание библиотеки
    #32372043
ViewSale
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Использование пользовательских функций Excel в Access или создание библиотеки

Как организовать доступ из Access к пользовательским функциям Excel
или подключить библиотеку своих функций, которые можно использовать и в Excel и в Access
Вариант использовать что-то одно (Excel или Access) отпадает!

Помогите, очень надо....
...
Рейтинг: 0 / 0
Использование пользовательских функций Excel в Access или создание библиотеки
    #32372045
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Модератор форума
Добавляем в References файл EXCEL8.OLB или EXCEL9.OLB и пользуемся всеми объектами библиотеки Excel.
...
Рейтинг: 0 / 0
Использование пользовательских функций Excel в Access или создание библиотеки
    #32372421
ViewSale
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Не могли бы Вы показать пример.

Допустим у меня есть функция test(test_param) в файле test_file.xls в модуле TestModule
Как вызвать эту функцию в Access?

Заранее благодарен!
...
Рейтинг: 0 / 0
Использование пользовательских функций Excel в Access или создание библиотеки
    #32372426
Фотография Geo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Посмотри тут и тут.\r
Если не найдешь, погляди в поиск по "Excel.Application".
...
Рейтинг: 0 / 0
Использование пользовательских функций Excel в Access или создание библиотеки
    #32372427
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Модератор форума
С функцией почему-то не получилось. А с сабом так:

Dim WB As Excel.Workbook
Set WB = Excel.Workbooks.Open("c:\oldd\test_file.xls")
Excel.Application.Run "testsub(7)"
WB.Close
...
Рейтинг: 0 / 0
Использование пользовательских функций Excel в Access или создание библиотеки
    #32372881
ViewSale
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Кому интересно - вот вариант с функцией:

Допустим есть функция Excel test_function(text_argument) в файле C:\test.xls

Чтобы ее использовать в Access нужна такая процедура:

Sub TestSub()

Set appExcel = Excel.Application
appExcel.Workbooks.Open ("C:\test.xls")
f_arg1 = "Test"

need_value= appExcel.Run("test_function", f_arg1)
Set appExcel = Nothing
End Sub

Также можно вызвать ф-ию в Excel из Access

Вопрос с созданием библиотеки открыт;)

Спасибо Geo, спасибо Владимир Саныч !
...
Рейтинг: 0 / 0
6 сообщений из 6, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Использование пользовательских функций Excel в Access или создание библиотеки
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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