Как получить список всех имён файлов из папки и создать для них гиперссылки в Excel?
Во многих офисных и управленческих сценариях возникает необходимость быстро получить список имён файлов из определённой папки и мгновенно открывать их по клику на гиперссылки в Excel. Это особенно удобно при работе с каталогами договоров, отчётов, изображений или журналов — обеспечивая чёткую структуру и бесперебойную навигацию. Хотя можно копировать имена файлов и вручную вставлять гиперссылки одну за другой, такой подход быстро становится нецелесообразным и крайне трудоёмким при наличии десятков или даже сотен файлов. К счастью, Excel предлагает несколько решений — как встроенные функции, так и специализированные инструменты, — позволяющие автоматизировать этот процесс и значительно повысить продуктивность. Ниже вы узнаете о различных подходах, их сценариях применения и ключевых советах для эффективной и безошибочной работы.
➤ Получить список всех имён файлов в папке и Создать гиперссылку с помощью Kutools для Excel
➤ Получить список всех имён файлов в папке и Создать гиперссылку с помощью формул Excel
➤ Получить список всех имён файлов в папке и Создать гиперссылку с помощью Power Query
Получение списка всех имён файлов из папки и создание Создать гиперссылку с помощью кода VBA
Когда нужно получить список всех файлов из папки и создать для каждого из них кликабельные гиперссылки в Excel, макрос VBA становится простым и практичным решением — особенно если вы уже знакомы с макросами и хотите автоматизировать работу с папками, содержимое которых регулярно обновляется.
1. Откройте книгу с новым листом, в которой хотите отобразить результаты.
2. Нажмите сочетание клавиш Alt + F11, чтобы открыть окно Microsoft Visual Basic для приложений.
3.В окне VBA перейдите в меню Вставка>Модульи вставьте следующий фрагмент кода в область модуля:
VBA: Получение списка всех имён файлов из папки и создание Создать гиперссылку
Sub Example1()
'Updateby Extendoffice
Dim xFSO As Object
Dim xFolder As Object
Dim xFile As Object
Dim xFiDialog As FileDialog
Dim xPath As String
Dim I As Integer
Set xFiDialog = Application.FileDialog(msoFileDialogFolderPicker)
If xFiDialog.Show = -1 Then
xPath = xFiDialog.SelectedItems(1)
End If
Set xFiDialog = Nothing
If xPath = "" Then Exit Sub
Set xFSO = CreateObject("Scripting.FileSystemObject")
Set xFolder = xFSO.GetFolder(xPath)
For Each xFile In xFolder.Files
I = I + 1
ActiveSheet.Hyperlinks.Add Cells(I, 1), xFile.Path, , , xFile.Name
Next
End Sub
4. Нажмите клавишу F5, чтобы запустить макрос VBA. Появится диалоговое окно Обзор, позволяющее выбрать папку, файлы из которой вы хотите вывести.
5. После выбора нужной папки и нажатия кнопки ОК все имена файлов именно из этой папки (но не из подпапок) будут помещены на активный лист, причём каждое имя будет снабжено кликабельной гиперссылкой для мгновенного доступа к файлу. Пример результата приведён ниже:
- Примечание: Этот сценарий VBA извлекает файлы только из выбранной вами основной папки — подпапки не учитываются. Если вам регулярно нужно включать подпапки, воспользуйтесь методом Kutools или измените код VBA так, чтобы он рекурсивно обрабатывал подкаталоги.
- Параметры макросов: Если макрос не запускается, убедитесь, что макросы включены (Файл > Параметры > Центр управления безопасностью > Параметры центра управления безопасностью > Параметры макросов), а также что у вас есть разрешение на доступ к выбранной папке.
Получение списка всех имён файлов из папки и создание Создать гиперссылку с помощью Kutools для Excel
Чтобы быстро и гибко получить список всех файлов — как из папки, так и из её подпапок, включая такие атрибуты, как размер, дата создания и путь, — воспользуйтесь функцией Список имен файлов инструмента Kutools для Excel. Этот подход идеально подходит пользователям, которым часто приходится формировать подобные списки, управлять большими объёмами данных или применять расширенные параметры: фильтрацию по типу файла, отображение скрытых файлов и папок, а также простое создание гиперссылок.
Если на вашем компьютере установлен Kutools для Excel, выполните следующие шаги:
1.Нажмите KUTOOLS PLUS>Импорт/экспорт>Список имен файлов, как показано ниже:
2.В окне диалога Список имен файловвыполните следующие действия:
(1.) Нажмите кнопку 
, чтобы указать целевую папку;
(2.) Чтобы включить файлы из подпапок, установите флажок Включить файлы в подкаталогах. Для отображения скрытых файлов также установите флажок Включить скрытые файлы и папки. Это обеспечит полный контроль над тем, какие файлы будут показаны.
(3.) В разделе Тип файлаукажите расширения или Тип файла, которые следует включить (например, *.xlsx, *.docx, *.pdf и т.д.);
(4.) При необходимости выберите единицу измерения для отображения Размер файла (байты, КБ, МБ и т.д.);
(5.) Обязательно установите флажок Создать гиперссылку в левом нижнем углу, чтобы обеспечить прямой доступ к файлам из списка.
Внимательно проверяйте свой выбор, особенно при работе с большими или общими папками, чтобы избежать лишних временных затрат на обработку и проблем с конфиденциальностью.
3. После настройки параметров в диалоговом окне нажмите кнопку ОК. Инструмент автоматически создаст подробный список всех файлов, соответствующих вашим критериям, с гиперссылками на новом листе. В процессе будут учтены файлы из всех выбранных подпапок и применены заданные параметры отображения. Вот типичный результат:
Нажмите, чтобы узнать больше о функции Список имен файлов…
Скачайте Kutools для Excel и начните бесплатный пробный период прямо сейчас!
Советы:
- Этот инструмент особенно полезен для регулярных задач — отчётности, архивирования и поиска документов при совместной работе в команде.
- Перед созданием списка рекомендуется подготовить отдельный лист для вывода результатов — так структура книги останется чёткой и упорядоченной.
- Всегда проверяйте полученные результаты: проблемы с сетью или правами доступа могут иногда привести к пропуску записей.
Демонстрация: Получение списка всех имён файлов из папки и создание Создать гиперссылку с помощью Kutools для Excel
Получение списка всех имён файлов из папки и создание Создать гиперссылку с помощью формул Excel
Если вы уже получили список имён файлов и их относительных или абсолютных путей другим способом — например, скопировав из Проводника Windows в Excel, с помощью команды DIR, Power Query или других инструментов импорта, — воспользуйтесь встроенной функцией Excel ГИПЕРССЫЛКА, чтобы быстро создать кликабельные ссылки для каждого файла. Этот метод прост в использовании, не требует макросов и идеально подходит тем, кому нужно просто создать гиперссылки на основе готового списка файлов — независимо от того, как именно этот список был получен.
1. Предположим, что в столбце A у вас указаны полные пути к файлам (начиная с ячейки A2 и ниже), например: C:\Documents\Report1.xlsx, C:\Documents\Report2.xlsx и т.д. В ячейку B2 (рядом с первым путём к файлу) введите следующую формулу:
=HYPERLINK(A2, A2)2. Нажмите клавишу Enter. Затем скопируйте формулу вниз на все строки, содержащие путь к файлу (перетащите маркер заполнения или дважды щёлкните по нему). В результате вы получите кликабельные ссылки с отображением полного пути в качестве текста.
3.Если вы хотите, чтобы текстом Отображаемый текст отображалось только имя файла (а не весь путь), используйте следующую формулу:
=HYPERLINK(A2, MID(A2, FIND("@", SUBSTITUTE(A2, "\", "@", LEN(A2) - LEN(SUBSTITUTE(A2, "\", "")))) + 1, 255))Это сохраняет цель гиперссылки как полный путь из ячейки A2, но отображает только имя файла.
Сочетание клавиш Excel 365 (если доступно):
Если ваш Excel поддерживает функцию ТЕКСТПОСЛЕ, имя файла можно отобразить проще:
=HYPERLINK(A2, TEXTAFTER(A2, "\", -1))4.Если в ячейках столбца Aсодержатся только имена файлов (без путей) и все файлы находятся в одной папке, добавьте Путь к файлу в формулу (адаптируйте путь под ваш случай):
=HYPERLINK("D:\SharedFiles\" &, A2, A2)Советы:
- Проверка корректности пути:Убедитесь, что пути в столбце A указаны правильно и доступны. Поддерживаются UNC-пути и сетевые пути (например,)
\\server\share\file.xlsx), если ваша система имеет к ним доступ. - Гибкость отображаемого текста: Второй аргумент функции
ГИПЕРССЫЛКАможно заменить любым описательным текстом по вашему выбору. - Относительный путь:Если книга сохранена в той же родительской папке, относительные ссылки также работают (например,)
.\Sub\file.xlsx).
Ограничения: Формулы Excel не могут напрямую сканировать папки на диске. Сначала необходимо получить список файлов (и их пути) — с помощью копирования из Проводника Windows, Power Query, сценария VBA или другого метода — а затем использовать приведённые выше формулы для создания гиперссылок.
Расширенный сценарий (веб-версия): В Excel для Интернета с помощью Office Scripts можно автоматизировать сбор списка файлов и вставку гиперссылок на облачные расположения (OneDrive/SharePoint). Подробнее см. в документации по Office Scripts от Microsoft.
Получить список всех имён файлов в папке и Создать гиперссылку с помощью Power Query («Получить и преобразовать»)
Power Query (встроенный в современные версии Excel) предлагает надёжный и автоматически обновляемый способ импорта списка файлов из папки и поддержания его в актуальном состоянии. Это идеальное решение, если вам нужны динамические обновления, возможность при необходимости включать подпапки, а также удобная фильтрация по типу файла или дате.
Пошаговая инструкция
1. Перейдите на вкладку Данные > Получить данные > Из файла > Из папки.
2. В открывшемся диалоговом окне нажмите кнопку Обзор, выберите нужную папку и нажмите кнопку ОК.
3. Нажмите кнопку Преобразовать данные, чтобы открыть редактор Power Query. Вы увидите таблицу файлов (по умолчанию)включая подпапки, благодаря соединителю Folder.Files).
4.Удалите ненужные столбцы (например,)Содержимое). Оставьте столбцы Путь к файлу, Имя, Дата изменения, Расширение и другие необходимые столбцы.
5. Создайте столбец с полным путём: Добавить столбец > Пользовательский столбец > формула: [Folder Path] & [Name], назовите его FullPath.
6. (Необязательно) Отфильтруйте по столбцу Расширение, чтобы оставить только нужные типы файлов (например,).xlsx, .pdf).
7. Нажмите кнопку Закрыть и загрузить, чтобы загрузить таблицу в Excel.
Как сделать ссылки кликабельными в Excel:
После загрузки таблицы Power Query (например,)Таблица1) и наличия в ней столбца ПолныйПуть, добавьте рядом с ним столбец Новый лист со следующей формулой:
=HYPERLINK([@[FullPath]])Протяните формулу вниз по столбцу. Теперь у вас есть кликабельные гиперссылки, где текстом ссылки служит полный путь. Если файлы в папке изменятся, используйте команду Данные > Обновить всё.
- Подпапки: Соединитель Из папки использует функцию
Folder.Files, которая по умолчанию возвращает файлы как из самой папки, так и из её подпапок. При необходимости выполните фильтрацию по полю Путь к файлу. - Скрытые и системные файлы: могут быть исключены в зависимости от разрешений и настроек.
- Гиперссылки: Power Query выводит обычный текст. Чтобы сделать ссылки кликабельными на листе, используйте приведённую выше формулу Excel
ГИПЕРССЫЛКА.
Связанная статья:
Как получить на листе список всех файлов из папки и её подпапок?
Лучшие инструменты повышения продуктивности в Office
Раскройте весь потенциал Excel с помощью Kutools для Excel и ощутите эффективность как никогда раньше.Kutools для Excel предлагает более 300 расширенных функций для повышения продуктивности и Экономия времени.Нажмите здесь, чтобы получить нужную Вам функцию…
Office Tab добавляет в Office вкладки и значительно упрощает Вашу работу
- Включите редактирование и чтение во вкладках в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Открывайте и создавайте несколько документов во вкладках одного окна — вместо того чтобы использовать отдельные окна.
- Повышает вашу продуктивность на 50 % и экономит сотни кликов мышью каждый день!
Все надстройки Kutools — один установщик
Kutools for Office — набор надстроек для Excel, Word, Outlook и PowerPoint, а также Office Tab Pro, идеально подходящий командам, работающим с разными приложениями Office.
- Единый комплект— надстройки для Excel, Word, Outlook и PowerPoint + Office Tab Pro
- Один установщик, одна лицензия— настройка занимает считанные минуты (готово для MSI)
- Лучше работать вместе— оптимизированная продуктивность во всех приложениях Office
- 30-дневная полнофункциональная пробная версия— без регистрации и кредитной карты
- Лучшее соотношение цены и качества— экономия по сравнению с покупкой отдельных надстроек