mail mail

Гиперссылки

Макросы и программы для работы с гиперссылками - обработка списка гиперссылок, добавление гиперссылок в таблицы Excel, загрузка файлов по гиперссылкам на листе

Функция VBA для выполнения веб-запроса (Web Query)

Функция GetQueryRange предназначена для автоматизации загрузки данных с веб-страниц.

Например, нам надо из макроса Excel получить данные с нескольких однотипных страниц сайта.

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

Поскольку количество обращений ко мне, с просьбами сделать программу загрузки данных из интернета, с каждым днём растёт, я решил сделать для этих целей универсальную функцию:

 

Sub ПримерИспользования()
    Dim ra As Range: On Error Resume Next
   
    Set ra = GetQueryRange("http://ExcelVBA.ru/", 6)
    Debug.Print ra.Address    ' переменная ra содержит ссылку на диапазон ячеек $A$1:$C$15,
   ' содержащий данные 6-й таблицы главной страницы сайта ExcelVBA.ru

    Set ra = GetQueryRange("http://excelvba.ru/sitemap.xml")
    Debug.Print ra.Address    ' теперь переменная ra содержит ссылку на диапазон ячеек $A$1:$D$502,
   ' содержащий данные карты сайта ExcelVBA.ru

End Sub

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

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

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

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

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

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

 

Надстройка для администрирования локальной сети

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

 

Надстройка будет полезна, если информация об оборудовании (IP-адреса, логины и пароли) хранится в книгах Excel.

Вы сможете получить доступ к часто используемым действиям из контекстного меню Excel.

Программа загрузки базы данных с сайта АвтоТрансИнфо

Программа предназначена для загрузки базы данных сайта autotransinfo.ru (АТИ) в книгу Excel.

 

Результатом работы программы является книга Excel, состоящая из 2 листов: «Организации» и «Контактные лица».

На листе «Организации» собрана вся информация об организациях, зарегистрированных на сайте autotransinfo.ru,
а на листе «Контактные лица» - подробные сведения о сотрудниках каждой из организаций, и их контактные данные
(имя, номер телефона и факса, ник в Скайпе, адрес электронной почты, номер ICQ)

 

Загрузка данных с сайта осуществляется в 3 этапа:

Автоматическое обновление книг и надстроек Excel

Форма настроек программы, выбора устанавливаемых обновлений, активации надстройки

Программа предназначена для реализации возможности автоматического и ручного обновления надстроек Excel, а также разграничения доступа и регистрации (активации) программного продукта.

Особенности данного решения:

 

Загрузка списка подпапок (2 уровней) в Excel

Скриншот таблицы Excel со списком папок и подпапок

Макрос предназначен для загрузки в Excel списка подпапок заданной папки

Для каждой из найденных папок производится поиск всех подпапок, и для каждой подпапки из списка выводится необходимая информация (в частности, количество файлов и подпапок, а также размер папки в байтах)

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

Также обратите внимание, что в столбце «размер папки» хоть число и выводится с единицей измерения (слово «байтов»), тем не менее, в ячейках хранятся числовые значения, что позволяет корректно выполнять сортировку, и использовать значения этих ячеек в формулах

Смотрите также макрос загрузки списка файлов из заданной папки,
и макрос загрузки списка подпапок выбранной папки

Код макроса:

Загрузка списка ЛНК с сайта oaontc.ru

Скриншот программы загрузки списка ЛНК с сайта

Программа предназначена для загрузки информации о лабораториях неразрушающего контроля в сайта oaontc.ru

 

На первом этапе (при нажатии кнопки «Ссылки») программа разгружает список из нескольких тысяч ссылок из результатов поиска по сайту

(обрабатываются результаты поиска более чем на 100 страницах):

 

Программа формирования прайс-листов для каталога Onliner.by

Форма подбора соответствия для модели ноутбука

Программа предназначена для формирования прайс-листов на ноутбуки с соответствии с требованиями интернет-каталога Onliner.by

Основные функции программы:

(учитываются цены фирм-конкурентов, цены onliner.by и надбавка фирмы)

  • загрузка каталога ноутбуков (названия, характеристики, цены) с сайта onliner.by в файл Excel, и обновление этого каталога
  • назначение соответствий моделей ноутбуков
  • (моделям с Onliner назначаются соответствия из внтуреннего каталога компании)

  • загрузка прайс-листов фирм-конкурентов для сравнительного анализа цен
  • автоматическое формирование цен на модели ноутбуков из внутреннего каталога компании
  • создание прайс-листа в формате каталога Onliner.by (экспорт в CSV) с последующей отправкой созданного файла на сервер по FTP

 

При назначении соответствий моделей есть возможность указать наличие модели на складе, тип расчёта, и срок гарантии.

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

 

Посмотреть все скриншоты программы

Поиск информации о фильмах, и импорт данных из интернета

Характеристики фильмов с сайта Кинопоиск

Эта программа позволяет найти в интернете (на сайте kinopoisk.ru), и вывести в таблицу Excel характеристики фильмов

(такие, как: год выпуска, страна, слоган, режиссер, сценарий, продюсер фильма, оператор, композитор, жанр, продолжительность и т.д. и т.п.)

Исходными данными для программы является столбец с названиями фильмов.

 

Отображение картинок (изображений) на форме

Форма отображения картинок с листа Excel

Программа предназначена для простановки гиперссылок в ячейки на найденные фотографии, и для последующего просмотра изображений, ссылки на которые присутствуют в ячейках Excel

Принцип работы программы:

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

Особенности программы:

  • Выполнена в виде надстройки
    (работает для любого листа любого файла)
  • Автоматическое распознавание столбцов, содержащих ссылки на изображения (имена файлов)
  • Максимальное количество отображаемых картинок: 4
    (при необходимости это количество можно увеличить)
  • Автоподбор размеров формы при изменении числа изображений
    (при наличии всего двух изображений форма уменьшается по высоте, если же картинка всего одна - то ещё и по ширине)
  • При щелчке на изображении выполняется открытие файла картинки средствами Windows

 

RSS-материал