Макросы VBA Excel — Страница 20

Определение IP адреса и страны по доменному имени

Макрос определения страны и IP адреса по доменному имени

Макрос предназначен для вывода IP адресов и названий стран, на основании столбца с доменными именами.

По состоянию на 2024 год, этот макрос не работает ввиду недоступности сайта smart-ip.net (можно переделать код на использование другого аналогичного веб-сервиса)

В прикреплённом файле - 2 способа реализации:

1) по доменному имени определяется IP адрес (посредством команды PING - выполнения ICMP запроса),
а затем определяется страна (по IP адресу), с использованием сервиса smart-ip.net

2) используется только сервис smart-ip.net
Отправляется запрос на указанный сервис, и из полученных данных вычленяются IP адрес и название страны.

Надстройка для программного добавления кнопок на лист Excel

Кнопки на листе Excel, созданные макросом

Надстройка предназначена для автоматизации добавления кнопок запуска макроса на лист Excel

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

Решением стало создание этой надстройки - теперь достаточно выделить диапазон ячеек на листе Excel, нажать комбинацию клавиш типа Alt + 1, - и через мгновение на листе создаётся зелёная кнопка с названием «Запуск», расположенная точно поверх ранее выделенных ячеек. Остаётся только назначить этой кнопке макрос, щелкнув по ней правой клавишей мыши.

Пример кода VBA для создания кнопки:

Sub ПримерИспользования()
    СоздатьКнопку Selection, vbGreen, "Обработать данные": End Sub
End Sub

Для вызова формы (где можно настроить текст и цвет будущей кнопки) предназначена комбинация клавиш Ctrl + Alt + Shift + B

Просмотр видео Youtube в Excel

Просмотр видеоролика с Youtube на форме в Excel

Макрос предназначен для показа видеороликов на форме в Microsoft Excel.

На форме UserForm расположен компонент WebBrowser, в котором открывается заданных видеоролик при запуске формы.

Вызов формы осуществляется таким кодом:

Добавление изображения в примечание

С помощью нижеуказанного макроса, в примечание активной ячейки можно добавить изображение.

При выделении данной ячейки - изображение будет отображаться в комментарии.

Данный код добавляет в контекстное меню ячейки новое действие "Вставить изображение"

Нижеуказанный макрос лучше всего поместить в "личную книгу макросов" (PERSONAL)

В модуль "ЭтаКнига" файла PERSONAL.xls вставляем:

Работа с панелями инструментов Excel и контекстными меню из VBA

Таблица Excel со списком панелей инструментов и контекстных меню

Макрос для облегчения работы с контекстными меню и панелями инструментов в Excel.