Как вывести список всех имён файлов из папки и её подпапок на лист?
Если вам нужно быстро и эффективно сгенерировать список имён файлов из каталога на листе Excel, воспользуйтесь одним из следующих методов — выберите тот, что лучше всего подходит для ваших задач.
- Перечисление всех имён файлов из папки на лист с помощью веб-браузера
- Перечисление всех имён файлов из папки на лист с помощью формулы
- Перечисление всех имён файлов из папки на лист с помощью кода VBA
- Перечисление всех имён файлов из папки и подпапок на лист с помощью Kutools
Перечисление всех имён файлов из папки на лист с помощью веб-браузера
Если вы хотите отобразить список файлов в папке прямо в веб-браузере, убедитесь, что на вашем компьютере установлен один из следующих браузеров: Firefox, Opera или Google Chrome. Допустим, вам нужно вывести список файлов из указанной папки на лист — см. снимок экрана:
1. Скопируйте путь к папке («Folder Test») в Проводнике. Например, путь к этой папке: "C:\Users\AddinTestWin10\Desktop\Folder Test".
2. Откройте любой из веб-браузеров (Firefox, Opera или Google Chrome), вставьте путь к файлу в адресную строку и нажмите клавишу Enter. См. снимок экрана:
3. Нажмите «Ctrl+A», чтобы выделить всё содержимое в веб-браузере, затем — «Ctrl+C», чтобы скопировать его.
4. Откройте Excel и вставьте содержимое на лист с помощью сочетания клавиш «Ctrl+V». См. снимок экрана:
- 1. При использовании этого метода отображаются только файлы из основной папки — файлы в подкаталогах не перечисляются.
- 2. Гиперссылки для имён файлов недоступны.
Перечисление всех имён файлов из папки на лист с помощью формулы
В Excel вы также можете использовать формулу, чтобы получить список всех имён файлов или указать нужный тип имён файлов из папки. Выполните следующие действия:
1. Скопируйте путь к файлу и вставьте его в ячейку, затем добавьте \* после пути к файлу, как показано на снимке экрана ниже:
2. Затем выберите «Формулы» > «Менеджер имен» (см. снимок экрана):
3. В диалоговом окне «Менеджер имен» нажмите кнопку «Создать» (см. снимок экрана):
4. В появившемся диалоговом окне «Новое имя» введите имя в поле «Имя», а в поле «Ссылка на» — приведённую ниже формулу (см. снимок экрана):
Примечание: в этой формуле «Sheet1!$A$1» — это ячейка на листе, содержащая путь к файлу, вставленный на шаге 1.
5. Затем нажмите «ОК» > «Закрыть», чтобы закрыть диалоговые окна, и введите следующую формулу в пустую ячейку, куда хотите вывести имена файлов. Перетащите маркер заполнения вниз, пока не появятся пустые ячейки. Теперь все имена файлов из указанной папки отобразятся, как показано на снимке экрана ниже:
Примечание: в этой формуле «Filenames» — имя ячейки, созданное на шаге 4, а «A1» — ячейка, содержащая путь к файлу.
- 1. Чтобы формулы корректно работали после закрытия и повторного открытия файла, сохраните книгу в формате «Книга Excel с поддержкой макросов».
- 2. Если вы хотите найти все файлы с определённым расширением — например, все файлы с расширением .docx — используйте *docx* вместо *. Аналогично, для файлов .xlsx укажите *xlsx*.
Перечисление всех имён файлов из папки на лист с помощью кода VBA
Используйте следующий код VBA для перечисления файлов из папки на листе:
1. Откройте лист и щёлкните по ячейке, в которую хотите вставить имена файлов.
2. Удерживая клавиши «ALT + F11» в Excel, вы откроете окно «Microsoft Visual Basic for Applications».
3. Выберите «Вставка» > «Модуль» и вставьте приведённый ниже код в окно модуля.
Код VBA: перечисление всех имён файлов из папки на листе
Sub listfiles()
'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, чтобы запустить код. Откроется новое окно «Обзор» — выберите папку, имена файлов из которой вы хотите получить.
5. Затем нажмите «ОК» — файлы из указанной папки появятся на листе в виде гиперссылок. См. снимок экрана:
Перечисление всех имён файлов из папки и подпапок на листе с помощью Kutools
Утилита «Список имен файлов» из набора «Kutools для Excel» легко создаёт на листе список файлов из любого каталога.
1. Откройте Excel, перейдите в меню «KUTOOLS PLUS» > «Импорт/экспорт» > «Список имен файлов…», как показано на снимке экрана:
2. В диалоговом окне «Список имен файлов» выполните следующие действия:
(1) Нажмите 
кнопку, чтобы указать папку, содержащую файлы, которые вы хотите перечислить;
(2) Установите флажок «Включить файлы в подкаталогах», чтобы перечислить все имена файлов в подпапках, или установите флажок «Включить скрытые файлы и папки», чтобы также отобразить имена скрытых файлов и файлов в скрытых папках;
(3) Укажите Тип файла, которые вы хотите перечислить в разделе «Тип файла»;
(4) В разделе «Единица измерения размера файла» выберите ту единицу измерения, в которой вы хотите отображать размер файла.
(5) При необходимости установите флажок «Создать гиперссылку».
3. Нажмите «ОК» — и список файлов из выбранного каталога или подкаталога автоматически появится на новом листе. См. снимок экрана:
Kutools для Excel— раскройте весь потенциал Excel с помощью более чем 300 незаменимых инструментов, которые ускоряют и упрощают вашу работу, а также воспользуйтесь возможностями ИИ для более разумной обработки данных и повышения продуктивности.Получить сейчас
Другие связанные статьи:
- Создание списка всех Имя листа из книги
- Предположим, у вас есть книга с несколькими листами, и вы хотите получить список всех их имён в текущей книге. Существует ли быстрый способ создать такой список в Excel без ручного пошагового ввода? В этом руководстве — пошаговые инструкции по автоматическому формированию списка имён листов в Excel.
- Копирование или перемещение файлов из одной папки в другую на основе списка
- Если у вас есть список имён файлов в столбце на листе, а сами файлы находятся в папке на компьютере, как быстро переместить или скопировать указанные в списке файлы из исходной папки в другую, как показано на следующем снимке экрана?
- Получение списка имён листов в книгах Google
- В этой статье я расскажу о нескольких способах получения имени текущего листа или списка имён всех листов в книгах Google.
- Переход между листами с помощью выпадающего списка
- Предположим, у вас есть книга, содержащая несколько листов. Теперь вам нужно создать выпадающий список или поле со списком, в котором отображаются все имена листов, и при выборе одного из них осуществляется немедленный переход к соответствующему листу. В этой статье я покажу, как осуществлять переход между листами с помощью выпадающего списка в 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-дневная полнофункциональная пробная версия— без регистрации и кредитной карты
- Лучшее соотношение цены и качества— экономия по сравнению с покупкой отдельных надстроек