Как сделать DLL для VBA?

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

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

Что нужно сделать, чтобы сделать DLL?

Я так понимаю, что нужен какой-то язык программирования.
Есть кажется VB6. Если сделать DLL, то в него можно просто поместить VBA-код, в том виде, в каком этот код находится в VBA? Или нужно изменить?

DLL хочу сделать, чтобы скрывать код макроса.

Например, такой код можно будет просто вставить в DLL или надо будет изменить:?

Visual Basic
1
2
3
4
5
6
7
Sub Procedure1()
 
    Dim shActive As Excel.Worksheet
    
    Set shActive = ActiveSheet
 
End Sub

@Антихакер32 · 20.07.2014, 12:09

Желания Скрипт'а зделать код закрытым вполне понятно,
именно это залог комерции.
Если бы не постоянные нападки одного пользователя, я бы тоже мог нормально это обсуждать, причем
у меня есть секреты чтоб делать такие dll-ки с запутанной логикой, притом
их не нужно регестрировать, а только указать ее место на диске, (или не указывать,
если держать в той-же папке) что очень актуально
в условиях когда в новых осях требуются права админа для регистрации

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

The trick, спасибо, тогда делаю вывод, что декомпиляция DLL и вскрытие VBA-макроса - это разные вещи и есть смысл, чтобы начать использовать DLL.

Только я вот хочу пользоваться современной программой (ещё прочитал, что VB6 в будущем может не быть, т.к. операционная система Windows перестанет его поддерживать) и хочу попробовать VB.NET.

Декомпиляция VB.NET тоже даст сложный результат?

Я хочу попробовать установить у себя Visual Studio и попробовать туда вставить макрос, а затем нажать кнопку, которая переведёт в VB.Net и хочу посмотреть, получится ли перевести из одного языка программирования в другой. Если не получится, тогда придётся VB6 использовать.

@Антихакер32 · 20.07.2014, 12:20

Даже можно и такое делать, чтоб нативная Dll скачивалась только на время работы программы
причем различная версия, например версия для халявщиков или комерческая версия,
вобщем вариантов множество

@The trick · 20.07.2014, 13:23

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

Декомпиляция VB.NET тоже даст сложный результат?

Этого я не могу тебе сказать, но с большей вероятностью что да.

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

ещё прочитал, что VB6 в будущем может не быть, т.к. операционная система Windows перестанет его поддерживать

VB.NET в будущем может и не быть, нашей планеты в будущем может не быть. Это не имеет смысла. Программа будет работать если в системе есть MSVBVM60.DLL, а она есть пока везде в стандартной комплектации Windows, и вряд ли ее будут исключать, т.к. сразу же огромное кол-во программ перестанут работать.

Сообщение от Антихакер32

что очень актуально
в условиях когда в новых осях требуются права админа для регистрации

Ты понимаешь это сам? Практически во всех случаях каждый является админом. Или запускаешь от имени админа, или делаешь манифест запроса прав админа, или используешь SxS и тогда ничего вообще не нужно регистрировать.

Сообщение от Антихакер32

у меня есть секреты чтоб делать такие dll-ки с запутанной логикой, притом
их не нужно регестрировать, а только указать ее место на диске, (или не указывать,
если держать в той-же папке)

Эти DLL неполноценны и в некоторых случаях не работают. Почитай там откуда ты скачал про баги, и почему сам автор закрыл доступ к скачиванию дистрибутива.

Сообщение от Антихакер32

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

Ага. А если все-таки пользователь сидит под ограниченной учеткой?

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

Только я вот хочу пользоваться современной программой

Для чего тебе при использовании макроса VBA пользоваться современной версией, что это даст?

Скрипт · 20.07.2014, 14:58 **[ТС]**

Сообщение от The trick

Для чего тебе при использовании макроса VBA пользоваться современной версией, что это даст?

вдруг я плавно перейду в другой язык программирования. А VB6 уже не поддерживается организацией "Microsoft".

Dragokas · 20.07.2014, 15:27

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

А VB6 уже не поддерживается организацией "Microsoft".

Он уже 6 лет как не поддерживается.
Это не мешает писать на нем программы любой сложности.

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

вдруг я плавно перейду в другой язык программирования.

Дерзай. Только учти, что программы на .Net требует, чтобы в системе был установлен .Net Framework
не ниже той версии, которая использовалась при компиляции проекта.
По-умолчанию, в XP его нет, в Win7, если не ошибаюсь версия 2.0.

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

Декомпиляция VB.NET тоже даст сложный результат?

Результат будет практически идентичным исходному коду (только и того, что без комментариев).
Microsoft обещает возможность компиляции .NET в Native. Но пока еще остается ждать.

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

Скрипт · 20.07.2014, 20:08 **[ТС]**

SoftIce, а как зарегистрировать то, что Вы выложили в сообщении #58?

@Антихакер32 · 20.07.2014, 20:22

По всякому можно, можно через Shell

Visual Basic
1
call Shell("RegSvr32 /s /u " & Path)', где Path это путь к твоей DLL

можно с помощью API, вот готовое решение

Dragokas · 20.07.2014, 20:37

Сообщение от Антихакер32

call Shell("RegSvr32 /s /u " & Path)'

Снимать то регистрацию зачем?

Скрипт, Вы можете создать процедурную DLL,
тогда необходимость в регистрации библиотеки отпадет.

SoftIce · 20.07.2014, 20:37

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

как зарегистрировать

Поместите dll в папку C:\Windows\System32 и выполните такую строку

REGSVR32.EXE C:\Windows\System32\For_Скрипт.dll

Вообще-то файл может находиться и по другому пути.

Получите примерно такой результат:

Dragokas · 20.07.2014, 20:41

+ для регистрации в среде Windows Vista и выше потребуется запустить регистрацию с повышенными привилегиями.
Если конечно не сделать вот так.

@Антихакер32 · 20.07.2014, 20:41

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

Снимать то регистрацию зачем?

скопипастил из своих же сообщений, спасибо что заметил..
вот так регить:

Visual Basic
1
call Shell("RegSvr32 /s " & Path)

так отменять:

Visual Basic
1
call Shell("RegSvr32 /s /u " & Path)'

Не по теме:

а ссыль на которую вы указазали, это и есть способ создание нативных DLL
о которых мы тут с "лучшим другом" вступили в полемеку :)

Dragokas · 20.07.2014, 20:45

Сообщение от Антихакер32

а ссыль на которую вы указазали, это и есть способ создание нативных DLL
о которых мы тут с "лучшим другом" вступили в полемеку

Комментарий модератора

Предупреждение за неявное оскорбление участника форума.
(п. 5.2. Правил Форума.)

@The trick · 20.07.2014, 21:00

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

Скрипт, Вы можете создать процедурную DLL,
тогда необходимость в регистрации библиотеки отпадет.

Такая DLL может не работать в VBA, т.к. ни о какой инициализации контекста речи нет. Также там есть баги с показом модальных окон насколько я знаю. Это все можно так или иначе обойти, но это уже будет непросто для ТС.
При подключении DLL в референсы она автоматически регистрируется.
ActiveX DLL можно зарегистрировать также вызвав из нее DLLRegisterServer, т.е. объявив в Declare ее, вызвать эту функцию, а потом уже спокойно делать CreateObject (CoCreateInstance).

Добавлено через 4 минуты
Самый идеальный вариант для ТС - написать ActiveX DLL на VB6. Т.к. VB6 COM-ориентированный на нем это будет очень просто сделать. Все остальное займет больше времени/сил.

Скрипт · 20.07.2014, 21:12 **[ТС]**

Зарегистрировал пока вручную, чтобы хотя бы посмотреть, будет работать или нет.
У меня "Windows 7" и просто так не получилось сделать, и я сделал по совету Dragokas из сообщения #71 - сделал с повышенными привилегиями.

Я зарегистрировал ActveX DLL так:

открыл "Диспетчер задач" (Ctrl + Shift + Del) - вкладка "Процессы" - внизу кнопка "Отображать процессы всех пользователей" (после нажатия эта кнопка исчезает);
там же в диспетчере задач: "Файл" - Новая задача (Выполнить...). Откроется окно;
в этом окне внизу нужно поставить флажок "Создать задачу с правами администратора" (у Dragokas не сказано про этот флажок в его инструкции, по которой я делал);
в поле ввёл такой текст:
regsvr32 C:\Users\User\Desktop\Excel+Dll\Dll\For_ Скрипт.dll
и нажал "OK";
появилось сообщение о том, что всё прошло успешно.

Протестировал макрос - макрос сработал.

@The trick · 20.07.2014, 21:22

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

У меня "Windows 7" и просто так не получилось сделать

VBA с правами админа запущен? Что мешает сделать так?

@Антихакер32 · 20.07.2014, 21:22

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

Протестировал макрос - макрос сработал.

Рад за вас, только вам нужно все это както автоматизировать,
если вы хотите копировать и распростронять то что вы хотите зделать
потому-что пользователь может не понять, почему чтото не запускается,
и так-же не в состоянии будет это объяснить

Скрипт · 20.07.2014, 21:25 **[ТС]**

Сообщение от The trick

VBA с правами админа запущен?

не знаю, с какими правами у меня.

The trick, я так подключал библиотеку, но не подключалось - выдавалась сообщение "ActiveX Component can't create object".

@The trick · 20.07.2014, 21:27

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

he trick, я так подключал библиотеку, но не подключалось - выдавалась сообщение "ActiveX Component can't create object".

Сообщение от The trick

VBA с правами админа запущен?

Да, нет?

Скрипт · 20.07.2014, 21:29 **[ТС]**

The trick, я не знаю, как это узнать, - нужно гуглить.

Новые блоги и статьи Все статьи Все блоги /
Программа опроса у.з. расходомера SLS-720F Argus19 02.09.2026 Программа опроса у. з. расходомера SLS-720F Программа опрашивает один раз в минуту три ультразвуковых расходомера SLS-720F через интерфейс RS-485 по протоколу Modbus RTU. Опрашиваются регистры. . .	Hyper-V: Компьютер должен поддерживать доверенный платформенный модуль 2.0. Maks 31.08.2026 При установке Windows 11 на виртуальную машину Hyper-V 2-го поколения вылезла такая ошибка: Решение: в параметрах виртуальной машины, в разделе "Безопасность" (Security) активировать флаг. . .	Архитектура биовида Стива в Майнкрафте: Зачем бонобо кубический каннибализм anaschu 30.08.2026 Кубический Вагинокапитализм в Minecraft: Математический инвариант ОДУ и рок Стивов-бонобо Главная задача разработанной «Модели Всего» — наглядно продемонстрировать наличие системной «судьбы». . .	Оттачиваю умение писать js программы. russiannick 30.08.2026 Проектом выходного дня стало написание Книги шифров Виженера. Итогом стала версия 200, синий туман. Синий туман назван так, потому что замораживает текст под собой. Нажатие синих кнопок управляют. . .
мат медиц модель 30. презентация проекта anaschu 27.08.2026 хоп хоп хоп хидахоп, а я кладую))	Как у меня протекала болезнь zorxor 27.08.2026 Здравствуйте, друзья! Эта запись блога предназначена именно для вас - для моих дорогих друзей, которые знали меня лично. Чтобы ответить на вопрос - а что же со мной произошло на самом деле? Я учился. . .	Нашел вот забавное видео о измерениях. Лучшее что я видел на эту тему kumehtar 26.08.2026 ILETXiw9bMQ Основная суть и тезисы по измерениям: 0D (Нулевое измерение): точка, не имеющая длины, ширины, высоты или объема. Объект не может перемещаться в 0D. 1D (Первое измерение):. . .	[EasyBuilder Pro] Памятка по разработке для панелей Weintek ФедосеевПавел 26.08.2026 Памятка по разработке для панелей Weintek ВВЕДЕНИЕ Ранее, при реализации проектов основное внимание уделял разработке управляющей программы для контроллера, а панели оператора доставалось время. . .

@Антихакер32 1201 / 473 / 46 Регистрация: 06.01.2014 Сообщений: 1,797 Записей в блоге: 19
	20.07.2014, 12:09
	Желания Скрипт'а зделать код закрытым вполне понятно, именно это залог комерции. Если бы не постоянные нападки одного пользователя, я бы тоже мог нормально это обсуждать, причем у меня есть секреты чтоб делать такие dll-ки с запутанной логикой, притом их не нужно регестрировать, а только указать ее место на диске, (или не указывать, если держать в той-же папке) что очень актуально в условиях когда в новых осях требуются права админа для регистрации 0

Скрипт 5472 / 1150 / 50 Регистрация: 15.09.2012 Сообщений: 3,578
	20.07.2014, 12:12 [ТС]
	The trick, спасибо, тогда делаю вывод, что декомпиляция DLL и вскрытие VBA-макроса - это разные вещи и есть смысл, чтобы начать использовать DLL. Только я вот хочу пользоваться современной программой (ещё прочитал, что VB6 в будущем может не быть, т.к. операционная система Windows перестанет его поддерживать) и хочу попробовать VB.NET. Декомпиляция VB.NET тоже даст сложный результат? Я хочу попробовать установить у себя Visual Studio и попробовать туда вставить макрос, а затем нажать кнопку, которая переведёт в VB.Net и хочу посмотреть, получится ли перевести из одного языка программирования в другой. Если не получится, тогда придётся VB6 использовать. 0

@Антихакер32 1201 / 473 / 46 Регистрация: 06.01.2014 Сообщений: 1,797 Записей в блоге: 19
	20.07.2014, 12:20
	Даже можно и такое делать, чтоб нативная Dll скачивалась только на время работы программы причем различная версия, например версия для халявщиков или комерческая версия, вобщем вариантов множество 0

Скрипт 5472 / 1150 / 50 Регистрация: 15.09.2012 Сообщений: 3,578
	20.07.2014, 20:08 [ТС]
	SoftIce, а как зарегистрировать то, что Вы выложили в сообщении #58? 0

Dragokas 18035 / 7738 / 892 Регистрация: 25.12.2011 Сообщений: 11,502 Записей в блоге: 16
	20.07.2014, 20:41
	+ для регистрации в среде Windows Vista и выше потребуется запустить регистрацию с повышенными привилегиями. Если конечно не сделать вот так. 1

Скрипт 5472 / 1150 / 50 Регистрация: 15.09.2012 Сообщений: 3,578
	20.07.2014, 21:12 [ТС]
	Зарегистрировал пока вручную, чтобы хотя бы посмотреть, будет работать или нет. У меня "Windows 7" и просто так не получилось сделать, и я сделал по совету Dragokas из сообщения #71 - сделал с повышенными привилегиями. Я зарегистрировал ActveX DLL так: открыл "Диспетчер задач" (Ctrl + Shift + Del) - вкладка "Процессы" - внизу кнопка "Отображать процессы всех пользователей" (после нажатия эта кнопка исчезает); там же в диспетчере задач: "Файл" - Новая задача (Выполнить...). Откроется окно; в этом окне внизу нужно поставить флажок "Создать задачу с правами администратора" (у Dragokas не сказано про этот флажок в его инструкции, по которой я делал); в поле ввёл такой текст: regsvr32 C:\Users\User\Desktop\Excel+Dll\Dll\For_ Скрипт.dll и нажал "OK"; появилось сообщение о том, что всё прошло успешно. Протестировал макрос - макрос сработал. 0

Скрипт 5472 / 1150 / 50 Регистрация: 15.09.2012 Сообщений: 3,578
	20.07.2014, 21:29 [ТС]
	The trick, я не знаю, как это узнать, - нужно гуглить. 0