Как создать DLL для VBA

Скрипт · Регистрация: 15.09.2012

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

Здравствуйте. Скажите, пожалуйста, как создать dll для VBA.

У меня "Visual Studio 2013 Express".
В dll хочу вставить такой код:

VB.NET

Public Class Class1
    Private Sub Procedure1()
        MsgBox(Prompt:="Сообщение.")
    End Sub
End Class

Что мне нужно сделать, чтобы я смог подключить этот dll-файл из VBA?

Памирыч · 11.08.2014, 10:27

Скрипт, ну по той ссылке что Вы привели все довольно прозрачно.
Сейчас я написал на .NET библиотеку классов, подключил ее в VB6 и вызвал функцию из библиотеки.

Библиотеку прилагаю (вместе с tlb)
Попробуйте ее подключить в VBA (я не умею работать с VBA)
Код библы

VB.NET

Public Class Class1
    Function Test() As String
        Return "Test"
    End Function
End Class

Если это то, что надо, напишите, объясню пошагово

Скрипт · 11.08.2014, 10:31 **[ТС]**

Памирыч, я обратил внимание, что в этой ссылке http://www.geeksengine.com/article/create-dll.html есть файл "tlb". Но я подставлял свой код в этот пример. Или "tlb" нужно обязательно использовать?

Памирыч · 11.08.2014, 10:38

Сообщение от Скрипт

Или "tlb" нужно обязательно использовать?

Он у меня сгенерировался сам.

В VB6 я подключал именно tlb (через проект - ссылки), ибо сама библиотека напрямую не пожелала импортироваться.

Еще один вопрос - а Вы в .NET библиотеку хотите вставлять VBA-шный код?
Тогда, скорее всего, ничего не выйдет, ибо .NET понимает только .NET-код

Скрипт · 11.08.2014, 10:42 **[ТС]**

Пункт 1

Я делал инструкции по этой ссылке http://www.geeksengine.com/article/create-dll.html, но у меня не сформировался в папке "bin" tlb-файл. Надо ещё раз попробовать сделать действия по инструкции.

Пункт 2

Сообщение от Памирыч

Еще один вопрос - а Вы в .NET библиотеку хотите вставлять VBA-шный код?

Я буду переделывать одну процедуру или один модуль с VBA на VB .Net.

Пункт 3

Попробую Ваш dll-файл и отпишусь.

@MrCold · 11.08.2014, 10:43

Сообщение от Памирыч

Еще один вопрос - а Вы в .NET библиотеку хотите вставлять VBA-шный код?
Тогда, скорее всего, ничего не выйдет, ибо .NET понимает только .NET-код

Памирыч, ну да. Придется автору СОМ -интерфейсы юзать.

Скрипт · 11.08.2014, 10:58 **[ТС]**

Памирыч, сейчас сделал "Release" (до этого было "Debug") и сформировался tlb-файл.
Сейчас проверю, может начнёт работать.

Памирыч · 11.08.2014, 11:05

Я уже скринов наделал, уж выложу, на всякий

Скрипт · 11.08.2014, 11:24 **[ТС]**

Памирыч, в VBA я подключил класс. Затем в VBA-коде сделал:

Visual Basic

Sub Procedure1()
 
    Dim myClass As New ClassLibrary2.Class1
    
End Sub

Но VBA не видит члены класса. Т.е. я печатаю дальше в коде "myClass", ставлю точку, но всплывающий список с членами класса не появляется. В Вашем примере, VBA не видит функцию "Test", а в моём - процедуру "Procedure1".
Видимо, чего-то не хватает.

Памирыч · 11.08.2014, 11:28

Скрипт, у меня тоже не видит. Ни в вба, ни в шестом. Дописал сам

Скрипт · 11.08.2014, 11:46 **[ТС]**

Памирыч, да, Ваш пример заработал (с функцией "Test").

Памирыч, а чтобы надстройка стала работать на другом компьютере, нужно будет создать инсталляционный пакет? В "VS 2013 Professional" инсталляционный пакет делается так:
Файл - Создать проект... - Другие типы проектов - Установка и развертывание.

Правильно я думаю? Или нужно будет что-то добавить в проект, чтобы DLL-файл работал на всех компьютерах?

@Юпатов Дмитрий · 11.08.2014, 12:01

Сообщение от Скрипт

В Вашем примере, VBA не видит функцию "Test", а в моём - процедуру "Procedure1".

Дык надо не Sub Procedure1(), а PUBLIC sub. Аналогично в функции test. Не?

Скрипт · 11.08.2014, 12:04 **[ТС]**

Юпатов Дмитрий, да, я перепутал: я думал, что Private даст доступ к содержимому класса, а оказалось, что Private, наоборот, закрывает доступ к внутренностям. Просто в VBA я очень редко что-то делаю со словами Private и Public, поэтому плохо ориентируюсь в этом.

@Юпатов Дмитрий · 11.08.2014, 12:07

Сообщение от Скрипт

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

ну да:
private - доступна только внутри класса/модуля
friend - доступна внутри данного проекта из других классов/модулей (ну и из родного тоже)
public - доступна извне

Памирыч · 11.08.2014, 12:10

Насчет переносимости не подскажу, попробовал сейчас перенести книгу на другой ПК вместе с файлами, при вызове функции возникла ошибка, мол ActiveX что-то там не может создать.

Зарегистрировать DLL тоже не получается, она для этого как есть непригодна

SoftIce · 11.08.2014, 12:28

Сообщение от Юпатов Дмитрий

Дык надо не Sub Procedure1(), а PUBLIC sub. Аналогично в функции test. Не?

Sub по умолчанию Public

@Юпатов Дмитрий · 11.08.2014, 13:57

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

Sub по умолчанию Public

Действительно...

Скрипт 5472 / 1150 / 50 Регистрация: 15.09.2012 Сообщений: 3,518
	11.08.2014, 10:31 [ТС]	22
	Памирыч, я обратил внимание, что в этой ссылке http://www.geeksengine.com/article/create-dll.html есть файл "tlb". Но я подставлял свой код в этот пример. Или "tlb" нужно обязательно использовать? 0

Памирыч Почетный модератор 21400 / 9134 / 1083 Регистрация: 11.04.2010 Сообщений: 11,014
	11.08.2014, 10:38	23
	Сообщение от Скрипт Или "tlb" нужно обязательно использовать? Он у меня сгенерировался сам. В VB6 я подключал именно tlb (через проект - ссылки), ибо сама библиотека напрямую не пожелала импортироваться. Еще один вопрос - а Вы в .NET библиотеку хотите вставлять VBA-шный код? Тогда, скорее всего, ничего не выйдет, ибо .NET понимает только .NET-код 1

@MrCold 873 / 771 / 173 Регистрация: 11.01.2012 Сообщений: 1,942
	11.08.2014, 10:43	25
	Сообщение от Памирыч Еще один вопрос - а Вы в .NET библиотеку хотите вставлять VBA-шный код? Тогда, скорее всего, ничего не выйдет, ибо .NET понимает только .NET-код Памирыч, ну да. Придется автору СОМ -интерфейсы юзать. 0

Скрипт 5472 / 1150 / 50 Регистрация: 15.09.2012 Сообщений: 3,518
	11.08.2014, 10:58 [ТС]	26
	Памирыч, сейчас сделал "Release" (до этого было "Debug") и сформировался tlb-файл. Сейчас проверю, может начнёт работать. 0

Памирыч Почетный модератор 21400 / 9134 / 1083 Регистрация: 11.04.2010 Сообщений: 11,014
	11.08.2014, 11:28	29
	Скрипт, у меня тоже не видит. Ни в вба, ни в шестом. Дописал сам 1

Скрипт 5472 / 1150 / 50 Регистрация: 15.09.2012 Сообщений: 3,518
	11.08.2014, 10:42 [ТС]	24
	Пункт 1 Я делал инструкции по этой ссылке http://www.geeksengine.com/article/create-dll.html, но у меня не сформировался в папке "bin" tlb-файл. Надо ещё раз попробовать сделать действия по инструкции. Пункт 2 Сообщение от Памирыч Еще один вопрос - а Вы в .NET библиотеку хотите вставлять VBA-шный код? Я буду переделывать одну процедуру или один модуль с VBA на VB .Net. Пункт 3 Попробую Ваш dll-файл и отпишусь. 0

Памирыч Почетный модератор 21400 / 9134 / 1083 Регистрация: 11.04.2010 Сообщений: 11,014
	11.08.2014, 11:05	27
	Сообщение было отмечено Памирыч как решение Решение Я уже скринов наделал, уж выложу, на всякий 2

Скрипт 5472 / 1150 / 50 Регистрация: 15.09.2012 Сообщений: 3,518
	11.08.2014, 11:46 [ТС]	30
	Памирыч, да, Ваш пример заработал (с функцией "Test"). Памирыч, а чтобы надстройка стала работать на другом компьютере, нужно будет создать инсталляционный пакет? В "VS 2013 Professional" инсталляционный пакет делается так: Файл - Создать проект... - Другие типы проектов - Установка и развертывание. Правильно я думаю? Или нужно будет что-то добавить в проект, чтобы DLL-файл работал на всех компьютерах? 0

@Юпатов Дмитрий 1710 / 1198 / 227 Регистрация: 23.12.2010 Сообщений: 1,527
	11.08.2014, 12:01	31
	Сообщение от Скрипт В Вашем примере, VBA не видит функцию "Test", а в моём - процедуру "Procedure1". Дык надо не Sub Procedure1(), а PUBLIC sub. Аналогично в функции test. Не? 1

Скрипт 5472 / 1150 / 50 Регистрация: 15.09.2012 Сообщений: 3,518
	11.08.2014, 12:04 [ТС]	32
	Юпатов Дмитрий, да, я перепутал: я думал, что Private даст доступ к содержимому класса, а оказалось, что Private, наоборот, закрывает доступ к внутренностям. Просто в VBA я очень редко что-то делаю со словами Private и Public, поэтому плохо ориентируюсь в этом. 0

@Юпатов Дмитрий 1710 / 1198 / 227 Регистрация: 23.12.2010 Сообщений: 1,527
	11.08.2014, 12:07	33
	Сообщение от Скрипт я думал, что Private даст доступ к содержимому класса, а оказалось, что Private, наоборот, закрывает доступ к внутренностям. ну да: private - доступна только внутри класса/модуля friend - доступна внутри данного проекта из других классов/модулей (ну и из родного тоже) public - доступна извне 0

Памирыч Почетный модератор 21400 / 9134 / 1083 Регистрация: 11.04.2010 Сообщений: 11,014
	11.08.2014, 12:10	34
	Насчет переносимости не подскажу, попробовал сейчас перенести книгу на другой ПК вместе с файлами, при вызове функции возникла ошибка, мол ActiveX что-то там не может создать. Зарегистрировать DLL тоже не получается, она для этого как есть непригодна 1

SoftIce es geht mir gut 11270 / 4752 / 1183 Регистрация: 27.07.2011 Сообщений: 11,439
	11.08.2014, 12:28	35
	Сообщение от Юпатов Дмитрий Дык надо не Sub Procedure1(), а PUBLIC sub. Аналогично в функции test. Не? Sub по умолчанию Public 1

@Юпатов Дмитрий 1710 / 1198 / 227 Регистрация: 23.12.2010 Сообщений: 1,527
	11.08.2014, 13:57	36
	Сообщение от SoftIce Sub по умолчанию Public Действительно... 0

Как создать DLL для VBA

Решение