Перейти к содержимому
Наше приложение «Дешевые авиабилеты» в AppGallery >>

VBA Excel. Свойства файла — вывод информации о файле

    Свойства файла: вывод информации о файле, доступной для просмотра через контекстное меню любого файла (кнопка «Свойства»), из кода VBA Excel.

    Вывод информации о файле

    В контекстном меню любого файла есть кнопка «Свойства», при нажатии которой открывается окно с информацией о файле. Эта информация может быть выведена для просмотра с помощью кода VBA Excel.

    Получение свойств любого файла программным способом на примере файла "Схема Белоусова.png", расположенного в папке "C:\Users\Evgeniy\Downloads\":

    Если убрать из кода условие, будут отображены все свойства файла, включая свойства без значений. Общее количество свойств — 304.


    Выражение

    возвращает ссылку на объект Folder для указанной папки («C:\Users\Evgeniy\Downloads\»).


    Выражение

    возвращает наименование свойства указанного файла («Схема Белоусова.png») под номером i.


    Выражение

    возвращает значение свойства указанного файла («Схема Белоусова.png») под номером i.

    Ширина и высота изображения

    Извлечение отдельных свойств файла рассмотрим на примере ширины и высоты изображения. Вывести значение свойства можно по его наименованию или порядковому номеру (индексу).

    Определяем индексы ширины и высоты в списке свойств изображения:

    Результат работы кода:

    Чтобы можно было присвоить значения ширины и высоты числовым переменным, необходимо убрать непечатные символы перед числами и отбросить текстовые части:

    Применение свойств файла

    Представленный ниже код VBA Excel выполняет следующие операции:

    • присваивает числовым переменным myWidth и myHeight значения ширины и высоты, извлеченные из информации о файле изображения;
    • задает ширине и высоте фигуры на рабочем листе размеры изображения;
    • добавляет фигуре ссылку на фоновое изображение.


    Фразы для контекстного поиска: информация о файле.


    Содержание рубрики VBA Excel по тематическим разделам со ссылками на все статьи.