Как подключить dll к VBA?

@inetcoyote · Регистрация: 25.03.2013

Студворк — интернет-сервис помощи студентам

пробовал так,

Visual Basic
1
2
3
4
5
Private Declare Function Suma Lib "D:\testDLL.dll" (x As Integer, y As Integer) As Integer
 
Dim a, b, c As Integer
c = Suma(2, 1)
TextBox1.Text = c

Но выдается ошибка 453: Can`t find Dll entry point Suma

@IvanOK · 25.03.2013, 16:51

Сообщение от inetcoyote

"D:\testDLL.dll

надо запхнуть в реєстр

@inetcoyote · 25.03.2013, 16:56 **[ТС]**

Сообщение от IvanOK

надо запхнуть в реєстр

пробовал и так, но выдавалась ошибка на совместимость dll и версией Windows

@Catstail · 25.03.2013, 18:25

Смотря какую... dll-ки бывают процедурные, а бывают ActiveX.

То, что Вы написали - правильно, если dll процедурная (т.е. написана С/С++ или любом языке, поддерживающем создание процедурных dll). Процедурную dll "запихивать в реестр" не надо (да она и не "запихнется").

ActiveX-dll должна быть зарегистрирована, для этого нужно один раз с правами админа выполнить команду:

regsvr32 имя_dll

После успешной регистрации появляются два способа использования dll.

1) Раннее связывание. К VBA проекту подключаем нашу dll-ку: Tools -> References -> галочку против нужного имени

Создание объектов из dll:

Set myObj = new Имя_Библ.Имя_класса

2) Позднее связывание:

Set myObj = CreateObject("Имя_Библ.Имя_класса")

Первый способ обеспечивает значительный выигрыш в скорости, а второй применим в скриптовых языках.

@inetcoyote · 25.03.2013, 19:38 **[ТС]**

Сообщение от Catstail

Смотря какую...

Set myObj = new Имя_Библ.Имя_класса
и

Set myObj = CreateObject("Имя_Библ.Имя_класса")

dll оказалась Active Х и всё таки зарегистрировалась, а вот насчет использования dll возникли проблемы,
конкретно писал строку "Set myObj = new Имя_Библ.Имя_класса" и выдает ошибку
Compile error: User-defined type not defined
С чем это может быть связано?

@Казанский · 25.03.2013, 20:43

Сообщение от inetcoyote

dll оказалась Active Х и всё таки зарегистрировалась

Сделайте следующее: Tools - References, найдите эту библиотеку и поставьте галочку. Если не найдете, нажмите Browse и выберите dll.
После этого в Object Explorer (F2) можете изучить объекты, которые содержит библиотека.
В программе наберите "dim myObj as new " - появится выпадающий список типов, выберите Имя_класса.
При наборе myObj. будет появляться выпадающий список свойств и методов этого класса.

@inetcoyote · 25.03.2013, 22:20 **[ТС]**

Сообщение от Казанский

"dim myObj as new "

Спасибо большое, это и правда сработало

Но появилась другая проблема. При загрузке ещё одной dll, она не захотела регистрироваться - видно была, не active x, а процедурной! После чего при попытке добавить её в "Tools -> References ->Brose..." выдается ошибка "Can`t add reference to the specified file" и dll не добавляется в reference? Это значит что такого типа dll невозможно подключить к VBA?

Новые блоги и статьи Все статьи Все блоги /
Новый ноутбук volvo 07.12.2025 Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro	Музыка, написанная Искусственным Интеллектом volvo 04.12.2025 Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .	От async/await к виртуальным потокам в Python IndentationError 23.11.2025 Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .	Поиск "дружественных имён" СОМ портов Argus19 22.11.2025 Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .	Сколько Государство потратило денег на меня, обеспечивая инсулином. Programma_Boinc 20.11.2025 Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .
Ломающие изменения в C#.NStar Alpha Etyuhibosecyu 20.11.2025 Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .	Мысли в слух kumehtar 18.11.2025 Кстати, совсем недавно имел разговор на тему медитаций с людьми. И обнаружил, что они вообще не понимают что такое медитация и зачем она нужна. Самые базовые вещи. Для них это - когда просто люди. . .	Создание Single Page Application на фреймах krapotkin 16.11.2025 Статья исключительно для начинающих. Подходы оригинальностью не блещут. В век Веб все очень привыкли к дизайну Single-Page-Application . Быстренько разберем подход "на фреймах". Мы делаем одну. . .	Фото: Daniel Greenwood kumehtar 13.11.2025	Расскажи мне о Мире, бродяга kumehtar 12.11.2025 — Расскажи мне о Мире, бродяга, Ты же видел моря и метели. Как сменялись короны и стяги, Как эпохи стрелою летели. - Этот мир — это крылья и горы, Снег и пламя, любовь и тревоги, И бескрайние. . .

@Catstail Супер-модератор 38160 / 21095 / 4306 Регистрация: 12.02.2012 Сообщений: 34,677 Записей в блоге: 14
	25.03.2013, 18:25
	Смотря какую... dll-ки бывают процедурные, а бывают ActiveX. То, что Вы написали - правильно, если dll процедурная (т.е. написана С/С++ или любом языке, поддерживающем создание процедурных dll). Процедурную dll "запихивать в реестр" не надо (да она и не "запихнется"). ActiveX-dll должна быть зарегистрирована, для этого нужно один раз с правами админа выполнить команду: regsvr32 имя_dll После успешной регистрации появляются два способа использования dll. 1) Раннее связывание. К VBA проекту подключаем нашу dll-ку: Tools -> References -> галочку против нужного имени Создание объектов из dll: Set myObj = new Имя_Библ.Имя_класса 2) Позднее связывание: Set myObj = CreateObject("Имя_Библ.Имя_класса") Первый способ обеспечивает значительный выигрыш в скорости, а второй применим в скриптовых языках. 2