Как скопировать названия файлов из папки в эксель
Как перечислить все имена файлов в папке и создать для них гиперссылки в Excel?
Для повседневной работы вам может потребоваться импортировать несколько имен файлов из папки на рабочий лист и создать гиперссылки для каждого файла, чтобы файл открывался легко и быстро. Возможно, вы можете скопировать и вставить имена файлов и создать для них гиперссылки по одному вручную, но это потратит много времени, если в папке есть сотни файлов. Сегодня я расскажу о некоторых быстрых и интересных методах решения этой задачи.
Список всех имен файлов в папке и создание гиперссылок с кодом VBA
Чтобы перечислить и создать гиперссылку с файлами из папки, следующий код VBA может оказать вам услугу.
1. Активируйте новый рабочий лист, чтобы поместить результат.
2. Удерживайте ALT + F11 , чтобы открыть Microsoft Visual Basic для приложений окно.
3. Нажмите Вставить > Модулии вставьте следующий код в Модули Окно.
VBA: список всех имен файлов в папке и создание гиперссылок
4, Затем нажмите F5 ключ, чтобы запустить этот код, и выберите папку, в которой вы хотите перечислить файлы из Приложения окно, см. снимок экрана:
5. После указания папки нажмите OK кнопку, и все файлы в определенной папке были перечислены в активный рабочий лист с гиперссылками, см. снимок экрана:
Внимание: Если в вашей конкретной папке есть подпапки, файлы в подпапках не будут перечислены.
Список всех имен файлов в папке и создание гиперссылок с помощью Kutools for Excel
Чтобы вывести список всех файлов в папке и ее подпапках и создать гиперссылки для каждого файла, Kutools for ExcelАвтора Список имен файлов могу сделать вам одолжение. С помощью этой функции все файлы в папке и подпапках будут перечислены сразу с некоторыми атрибутами, такими как имя файла, размер файла, время создания, содержащая папку и т. Д.
Если вы установили Kutools for Excel, выполните следующие действия:
1. Нажмите Кутулс Плюс > Импорт Экспорт > Список имен файлов, см. снимок экрана:
2. В Список имен файлов диалоговом окне выполните следующие действия:
(1.) Щелкните кнопка для выбора папки, в которой вы хотите перечислить имена файлов;
(2.) Проверить Включить файлы в подкаталоги если вы хотите перечислить имена файлов в подпапках, отметьте Включать скрытые файлы и папки если вы хотите вывести список скрытых файлов;
(3.) Укажите типы файлов, которые вы хотите найти, и укажите их в Тип файлов раздел;
(4.) Выберите размер файла, который вы хотите отобразить;
(5.) Проверить Создать гиперссылки в левом нижнем углу диалогового окна.
3. Затем нажмите Ok кнопку, и все файлы в папке и подпапках были перечислены на новом листе с гиперссылками по мере необходимости, см. снимок экрана:
Демо: перечислите все имена файлов в папке и создайте гиперссылки с помощью Kutools for Excel
Kutools for Excel: с более чем 300 удобными надстройками Excel, которые можно попробовать бесплатно без ограничений в течение 30 дней. Загрузите и бесплатную пробную версию прямо сейчас!
Связанная статья:
Лучшие инструменты для работы в офисе
Kutools for Excel решает большинство ваших проблем и увеличивает вашу производительность на 80%
- Снова использовать: Быстро вставить сложные формулы, диаграммы и все, что вы использовали раньше; Зашифровать ячейки с паролем; Создать список рассылки и отправлять электронные письма .
- Бар Супер Формулы (легко редактировать несколько строк текста и формул); Макет для чтения (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон .
- Объединить ячейки / строки / столбцы без потери данных; Разделить содержимое ячеек; Объединить повторяющиеся строки / столбцы . Предотвращение дублирования ячеек; Сравнить диапазоны .
- Выберите Дубликат или Уникальный Ряды; Выбрать пустые строки (все ячейки пустые); Супер находка и нечеткая находка во многих рабочих тетрадях; Случайный выбор .
- Точная копия Несколько ячеек без изменения ссылки на формулу; Автоматическое создание ссылок на несколько листов; Вставить пули , Флажки и многое другое .
- Извлечь текст , Добавить текст, Удалить по позиции, Удалить пробел ; Создание и печать промежуточных итогов по страницам; Преобразование содержимого ячеек в комментарии .
- Суперфильтр (сохранять и применять схемы фильтров к другим листам); Расширенная сортировка по месяцам / неделям / дням, периодичности и др .; Специальный фильтр жирным, курсивом .
- Комбинируйте книги и рабочие листы ; Объединить таблицы на основе ключевых столбцов; Разделить данные на несколько листов ; Пакетное преобразование xls, xlsx и PDF . Pivot Table Grouping by week number, day of week and more. Show Unlocked, Locked Cells by different colors; Highlight Cells That Have Formula/Name . -->
- Более 300 мощных функций . Поддерживает Office / Excel 2007-2019 и 365. Поддерживает все языки. Простое развертывание на вашем предприятии или в организации. Полнофункциональная 30-дневная бесплатная пробная версия. 60-дневная гарантия возврата денег.
Вкладка Office: интерфейс с вкладками в Office и упрощение работы
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint , Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!
Запуск кода VBA, указанного выше, показывает, что выбранный каталог пуст, когда он заполнен файлами Excel.
Большое спасибо, хотя я не могу просматривать файлы в выбранном каталоге, как сказал Барри, он все равно создает гиперссылки для всех файлов в этом каталоге.
«VBA: список всех имен файлов в папке и создание гиперссылок» — это здорово! Он работает отлично! Спасибо за публикацию! Один вопрос. Теперь, когда вы рассказали нам, как добавлять ссылки из папки, можно ли использовать эти ссылки для получения информации, скажем, с одного или двух разных листов в каждом из перечисленных файлов? Это будут одни и те же ячейки для каждого из файлов, для которых у нас теперь есть список. Это поможет создать всеобъемлющее содержимое с активными ссылками на непонятные имена файлов.
Как мне изменить этот код, чтобы он отображал имена папок, а не имена файлов? И как бы я изменил его, чтобы проверять подпапки на наличие файлов?
Привет, Элли,
Чтобы перечислить все имена папок и подпапок из каталога, приведенный ниже код VBA может помочь вам, попробуйте, надеюсь, он вам поможет.
Имена подпапок()
Приложение.ScreenUpdating = False
Dim xPath как строка
Dim xWs как рабочий лист
Dim fso As Object, j As Long, folder1 As Object
С Application.FileDialog(msoFileDialogFolderPicker)
.Title = "Выберите папку"
.Показать
Конец с
On Error Resume Next
xPath = Application.FileDialog(msoFileDialogFolderPicker).SelectedItems(1) & "\"
Application.Workbooks.Добавить
Установите xWs = Application.ActiveSheet
xWs.Cells(1, 1).Value = xPath
xWs.Cells(2, 1).Resize(1, 5).Value = Array("Путь", "Каталог", "Имя", "Дата создания", "Дата последнего изменения")
Установите fso = CreateObject ("Scripting.FileSystemObject")
Установить папку1 = fso.getFolder(xPath)
папка getSubFolder1
xWs.Cells(2, 1).Resize(1, 5).Interior.Color = 65535
xWs.Cells(2, 1).Resize(1, 5).EntireColumn.AutoFit
Application.ScreenUpdating = True
End Sub
Sub getSubFolder (ByRef prntfld как объект)
Затемнить подпапку как объект
Dim subfld как объект
Dim xRow As Long
Для каждой подпапки в prntfld.SubFolders
xRow = Диапазон ("A1"). Конец (xlDown). Строка + 1
Cells(xRow, 1).Resize(1, 5).Value = Array(SubFolder.Path, Left(SubFolder.Path, InStrRev(SubFolder.Path, "\")), SubFolder.Name, SubFolder.DateCreated, SubFolder. Дата последнего изменения)
Следующая подпапка
Для каждого подкаталога в prntfld.SubFolders
getSubFolder subfld
Следующий подраздел
End Sub
Привет, Юрий,
Чтобы решить вашу проблему, попробуйте следующий код:
Имена подпапок()
Приложение.ScreenUpdating = False
Dim xPath как строка
Dim xWs как рабочий лист
Dim xRg как диапазон
Dim fso As Object, j As Long, folder1 As Object
С Application.FileDialog(msoFileDialogFolderPicker)
.Title = "Выберите папку"
.Показать
Конец с
On Error Resume Next
xPath = Application.FileDialog(msoFileDialogFolderPicker).SelectedItems(1) & "\"
Application.Workbooks.Добавить
Установите xWs = Application.ActiveSheet
Установить xRg = xWs.Cells(1, 1)
xRg.Value = xPath
xWs.Hyperlinks.Add Anchor:=xRg, Address:=xPath, TextToDisplay:=xPath
xWs.Cells(2, 1).Resize(1, 5).Value = Array("Путь", "Каталог", "Имя", "Дата создания", "Дата последнего изменения")
Установите fso = CreateObject ("Scripting.FileSystemObject")
Установить папку1 = fso.GetFolder(xPath)
папка getSubFolder1
xWs.Cells(2, 1).Resize(1, 5).Interior.Color = 65535
xWs.Cells(2, 1).Resize(1, 5).EntireColumn.AutoFit
Application.ScreenUpdating = True
End Sub
Sub getSubFolder (ByRef prntfld как объект)
Затемнить подпапку как объект
Dim subfld как объект
Dim xRow As Long
Dim xStr как строка
Dim xRg как диапазон
Для каждой подпапки в prntfld.SubFolders
xRow = Диапазон ("A1"). Конец (xlDown). Строка + 1
Cells(xRow, 1).Resize(1, 5).Value = Array(SubFolder.Path, Left(SubFolder.Path, InStrRev(SubFolder.Path, "\")), SubFolder.Name, SubFolder.DateCreated, SubFolder. Дата последнего изменения)
Установите xRg = ячейки (xRow, 1)
xRg.Worksheet.Hyperlinks.Add Anchor:=xRg, Address:=xRg.Value, TextToDisplay:=xRg.Value
Установите xRg = ячейки (xRow, 2)
xRg.Worksheet.Hyperlinks.Add Anchor:=xRg, Address:=xRg.Value, TextToDisplay:=xRg.Value
Следующая подпапка
Для каждого подкаталога в prntfld.SubFolders
getSubFolder subfld
Следующий подраздел
End Sub
Иногда бывает необходимо заполучить на лист Excel список файлов в заданной папке и ее подпапках. В моей практике такое встречалось неоднократно, например:
- перечислить в приложении к договору на проведение тренинга список файлов из раздаточных материалов для особо щепетильных юристов в некоторых компаниях
- создать список файлов для ТЗ проекта
- сравнить содержимое папок (оригинал и бэкап, например)
Для реализации подобной задачи можно использовать несколько способов.
Способ 1. Скелет из шкафа - функция ФАЙЛЫ
Этот способ использует древнюю функцию ФАЙЛЫ (FILES) , оставшуюся в Microsoft Excel с далеких девяностых. Вы не найдете эту функцию в общем списке функций, но для совместимости, она всё ещё остаётся внутри движка Excel, и мы вполне можем её использовать.
1. В любую ячейку листа (например, в А1) введём путь к папке, список файлов из которой мы хотим получить.
Обратите внимание, что путь должен оканчиваться шаблоном со звездочками:
- *.* - любые файлы
- *.xlsx - книги Excel (только с расширением xlsx)
- *.xl* - любые файлы Excel
- *отчет* - файлы, содержащие слово отчет в названии
2. Создадим именованный диапазон с помощью вкладки Формулы - далее кнопка Диспетчер имен - Создать (Formulas - Names Manger - Create) . В открывшемся окне введем любое имя без пробелов (например Мои_файлы) и в поле диапазона выражение:
После нажатия на ОК будет создан именованный диапазон с именем Мои_файлы, где хранится список всех файлов из указанной в А1 папки. Останется их оттуда только извлечь.
3. Чтобы извлечь имена отдельных файлов из созданной переменной, используем функцию ИНДЕКС (INDEX) , которая в Excel вытаскивает данные из массива по их номеру:
Если лениво делать отдельный столбец с нумерацией, то можно воспользоваться костылем в виде функции СТРОКИ (ROWS) , которая будет подсчитывать количество заполненных строк с начала списка автоматически:
=ИНДЕКС(Мои_файлы; ЧСТРОК($B$3:B3) )
= ЕСЛИОШИБКА( ИНДЕКС(Мои_файлы; ЧСТРОК($B$3:B3)) ; "")
Важное примечание : формально функция ФАЙЛЫ относится к макро-функциям, поэтому необходимо будет сохранить ваш файл в формате с поддержкой макросов (xlsm или xlsb).
Способ 2. Готовый макрос для ленивых
Если вы знакомы с макросами (не в смысле их программирования, а в смысле копипастинга готовых кодов на VBA), то вам, возможно, отлично зайдёт небольшой макрос, добавляющий в текущую книгу новый пустой лист и выводящий на него список всех файлов с их параметрами из заданной пользователем папки.
Для добавления макроса в вашу книгу нажмите сочетание клавиш Alt + F11 , или кнопку Visual Basic на вкладке Разработчик (Developer) , в открывшемся окне редактора Visual Basic вставьте новый модуль через меню Insert - Module и скопируйте туда текст этого макроса:
Для запуска макроса нажмите сочетание клавиш Alt + F8 ,или кнопку Макросы (Macros) на вкладке Разработчик (Developer) , выберите наш макрос FileList и нажмите кнопку Выполнить (Run) . В диалоговом окне выберите любую папку или диск и - вуаля!
Если захотите, чтобы вместо пути к файлу в столбце B выводилась живая гиперссылка, то замените 52-ю строку
Cells(r, 2).Formula = FileItem.Path
Cells(r, 2).Formula = "=HYPERLINK(""" & FileItem.Path & """)"
Способ 3. Мощь и красота - надстройка Power Query
Power Query - это очень мощная и при этом бесплатная надстройка для Excel от Microsoft, упрощающая множество задач по загрузке и трансформации данных. В нашей ситуации она тоже может здорово помочь.
Если у вас Excel 2016 или новее, то Power Query уже встроена в Excel по умолчанию, поэтому просто на вкладке Данные выберите команду Создать запрос / Получить данные - Из файла - Из папки (Create Query / Get Data - From file - From folder) . Если у вас Excel 2010-2013, то Power Query нужно будет скачать с сайта Microsoft и установить как отдельную надстройку и она появится у вас в Excel в виде отдельной вкладки Power Query. На ней будет аналогичная кнопка Из файла - Из папки (From file - From folder) .
В открывшемся окне нужно будет указать папку, содержимое которой мы хотим получить. После нажатия на ОК Power Query обшарит указанную папку и все вложенные подпапки и выдаст на экран окно с предварительным просмотром результатов:
Если внешний вид списка вас устраивает, то можно смело жать внизу кнопку Загрузить (Load) , чтобы залить эти данные на новый лист. Если же хочется дополнительно обработать список (удалить лишние столбцы, отобрать только нужные файлы и т.п.), то нужно выбрать команду Изменить / Преобразовать данные (Edit / Transform Data).
Поверх окна Excel откроется окно редактора Power Query, где мы увидим список всех наших файлов в виде таблицы:
Дальше возможны несколько вариантов:
-
Если нужны только файлы определенного типа, то их можно легко отобрать с помощью фильтра по столбцу Extension:
После того, как необходимые файлы отобраны, можно смело удалить ненужные столбцы, щелкнув по заголовку столбца правой кнопкой мыши и выбрав команду Удалить (Remove column ) . Это, кстати, уже никак не повлияет на фильтрацию или сортировку нашего списка:
Если в будущем планируется подсчитывать количество файлов в каждой папке (например, для контроля поступивших заявок или подсчета статистики по заявкам), то имеет смысл дополнительно сделать ещё пару действий:
- Щелкните правой кнопкой мыши по столбцу Folder Path и выберите команду Дублировать столбец (Duplicate Column) .
- Выделите скопированный столбец и на вкладке Преобразование (Transform) выберите Разделить столбец - По разделителю (Split Column - By delimiter)
Мы получим рядом с нашими данными еще несколько столбцов, где будут продублированы имена вложенных папок - это пригодится нам чуть позже для подсчета статистики с помощью сводной таблицы:
Получившиеся столбцы можно переименовать (Диск, Папка1, Папка2 и т.д.), просто щёлкнув дважды по заголовку каждого.
И, наконец, когда список готов, то его можно выгрузить на лист с помощью команды Главная - Закрыть и загрузить - Закрыть и загрузить в. (Home - Close & Load - Close & Load to. ) :
И, само-собой, теперь можно построить по нашей таблице сводную (вкладка Вставка - Сводная таблица), чтобы легко подсчитать количество файлов в каждой папке:
Дополнительным бонусом можно сделать еще один столбец с функцией ГИПЕРССЫЛКА (HYPERLINK) , которая создаст красивые стрелочки-ссылки для моментального перехода к каждому файлу:
Мелочь, а приятно :)
И вдвойне приятно, что в будущем, при изменении содержимого исходной папки, достаточно будет просто щелкнуть мышью по нашей таблице и выбрать команду Обновить (Refresh) - и Power Query выполнит всю цепочку запрограммированных нами единожды действий уже автоматически, отобразив все изменения в составе папки.
Иногда бывает необходимо заполучить на лист Excel список файлов в заданной папке и ее подпапках. В моей практике такое встречалось неоднократно, например:
- перечислить в приложении к договору на проведение тренинга список файлов из раздаточных материалов для особо щепетильных юристов в некоторых компаниях
- создать список файлов для ТЗ проекта
- сравнить содержимое папок (оригинал и бэкап, например)
Для реализации подобной задачи можно использовать несколько способов.
Способ 1. Скелет из шкафа - функция ФАЙЛЫ
Этот способ использует древнюю функцию ФАЙЛЫ (FILES) , оставшуюся в Microsoft Excel с далеких девяностых. Вы не найдете эту функцию в общем списке функций, но для совместимости, она всё ещё остаётся внутри движка Excel, и мы вполне можем её использовать.
1. В любую ячейку листа (например, в А1) введём путь к папке, список файлов из которой мы хотим получить.
Обратите внимание, что путь должен оканчиваться шаблоном со звездочками:
- *.* - любые файлы
- *.xlsx - книги Excel (только с расширением xlsx)
- *.xl* - любые файлы Excel
- *отчет* - файлы, содержащие слово отчет в названии
2. Создадим именованный диапазон с помощью вкладки Формулы - далее кнопка Диспетчер имен - Создать (Formulas - Names Manger - Create) . В открывшемся окне введем любое имя без пробелов (например Мои_файлы) и в поле диапазона выражение:
После нажатия на ОК будет создан именованный диапазон с именем Мои_файлы, где хранится список всех файлов из указанной в А1 папки. Останется их оттуда только извлечь.
3. Чтобы извлечь имена отдельных файлов из созданной переменной, используем функцию ИНДЕКС (INDEX) , которая в Excel вытаскивает данные из массива по их номеру:
Если лениво делать отдельный столбец с нумерацией, то можно воспользоваться костылем в виде функции СТРОКИ (ROWS) , которая будет подсчитывать количество заполненных строк с начала списка автоматически:
=ИНДЕКС(Мои_файлы; ЧСТРОК($B$3:B3) )
= ЕСЛИОШИБКА( ИНДЕКС(Мои_файлы; ЧСТРОК($B$3:B3)) ; "")
Важное примечание : формально функция ФАЙЛЫ относится к макро-функциям, поэтому необходимо будет сохранить ваш файл в формате с поддержкой макросов (xlsm или xlsb).
Способ 2. Готовый макрос для ленивых
Если вы знакомы с макросами (не в смысле их программирования, а в смысле копипастинга готовых кодов на VBA), то вам, возможно, отлично зайдёт небольшой макрос, добавляющий в текущую книгу новый пустой лист и выводящий на него список всех файлов с их параметрами из заданной пользователем папки.
Для добавления макроса в вашу книгу нажмите сочетание клавиш Alt + F11 , или кнопку Visual Basic на вкладке Разработчик (Developer) , в открывшемся окне редактора Visual Basic вставьте новый модуль через меню Insert - Module и скопируйте туда текст этого макроса:
Для запуска макроса нажмите сочетание клавиш Alt + F8 ,или кнопку Макросы (Macros) на вкладке Разработчик (Developer) , выберите наш макрос FileList и нажмите кнопку Выполнить (Run) . В диалоговом окне выберите любую папку или диск и - вуаля!
Если захотите, чтобы вместо пути к файлу в столбце B выводилась живая гиперссылка, то замените 52-ю строку
Cells(r, 2).Formula = FileItem.Path
Cells(r, 2).Formula = "=HYPERLINK(""" & FileItem.Path & """)"
Способ 3. Мощь и красота - надстройка Power Query
Power Query - это очень мощная и при этом бесплатная надстройка для Excel от Microsoft, упрощающая множество задач по загрузке и трансформации данных. В нашей ситуации она тоже может здорово помочь.
Если у вас Excel 2016 или новее, то Power Query уже встроена в Excel по умолчанию, поэтому просто на вкладке Данные выберите команду Создать запрос / Получить данные - Из файла - Из папки (Create Query / Get Data - From file - From folder) . Если у вас Excel 2010-2013, то Power Query нужно будет скачать с сайта Microsoft и установить как отдельную надстройку и она появится у вас в Excel в виде отдельной вкладки Power Query. На ней будет аналогичная кнопка Из файла - Из папки (From file - From folder) .
В открывшемся окне нужно будет указать папку, содержимое которой мы хотим получить. После нажатия на ОК Power Query обшарит указанную папку и все вложенные подпапки и выдаст на экран окно с предварительным просмотром результатов:
Если внешний вид списка вас устраивает, то можно смело жать внизу кнопку Загрузить (Load) , чтобы залить эти данные на новый лист. Если же хочется дополнительно обработать список (удалить лишние столбцы, отобрать только нужные файлы и т.п.), то нужно выбрать команду Изменить / Преобразовать данные (Edit / Transform Data).
Поверх окна Excel откроется окно редактора Power Query, где мы увидим список всех наших файлов в виде таблицы:
Дальше возможны несколько вариантов:
-
Если нужны только файлы определенного типа, то их можно легко отобрать с помощью фильтра по столбцу Extension:
После того, как необходимые файлы отобраны, можно смело удалить ненужные столбцы, щелкнув по заголовку столбца правой кнопкой мыши и выбрав команду Удалить (Remove column ) . Это, кстати, уже никак не повлияет на фильтрацию или сортировку нашего списка:
Если в будущем планируется подсчитывать количество файлов в каждой папке (например, для контроля поступивших заявок или подсчета статистики по заявкам), то имеет смысл дополнительно сделать ещё пару действий:
- Щелкните правой кнопкой мыши по столбцу Folder Path и выберите команду Дублировать столбец (Duplicate Column) .
- Выделите скопированный столбец и на вкладке Преобразование (Transform) выберите Разделить столбец - По разделителю (Split Column - By delimiter)
Мы получим рядом с нашими данными еще несколько столбцов, где будут продублированы имена вложенных папок - это пригодится нам чуть позже для подсчета статистики с помощью сводной таблицы:
Получившиеся столбцы можно переименовать (Диск, Папка1, Папка2 и т.д.), просто щёлкнув дважды по заголовку каждого.
И, наконец, когда список готов, то его можно выгрузить на лист с помощью команды Главная - Закрыть и загрузить - Закрыть и загрузить в. (Home - Close & Load - Close & Load to. ) :
И, само-собой, теперь можно построить по нашей таблице сводную (вкладка Вставка - Сводная таблица), чтобы легко подсчитать количество файлов в каждой папке:
Дополнительным бонусом можно сделать еще один столбец с функцией ГИПЕРССЫЛКА (HYPERLINK) , которая создаст красивые стрелочки-ссылки для моментального перехода к каждому файлу:
Мелочь, а приятно :)
И вдвойне приятно, что в будущем, при изменении содержимого исходной папки, достаточно будет просто щелкнуть мышью по нашей таблице и выбрать команду Обновить (Refresh) - и Power Query выполнит всю цепочку запрограммированных нами единожды действий уже автоматически, отобразив все изменения в составе папки.
Самый простой способ создания списка файлов, расположенных в папке.
Поделюсь простым проверенным способом создания списка файлов. Пошаговое руководство.
Шаг 1. Войти в папку список файлов из которой вы хотите сформировать.
Шаг 2. Кликнуть правой кнопкой по пустому полю в папке (не по файлу)
Создать текстовый документ
Шаг 3. Из выпадающего мену выбрать пункт «Создать»>> «Текстовый документ»
Шаг 4. Открыть появившийся текстовый документ и записать в него три строчки с кодом:
Шаг 5. Закрыть с сохранением документ.
Закрыть документ с сохранением
Шаг 6. Переименовать расширение файла с «TXT» на «BAT» и нажать кнопку «Enter»
Переименовать файл в BAT
Шаг 7. Запустить полученный файл.
После запуска .bat файла в папке, из которой вы его запустили появится текстовый документ со списком файлов хранящихся в папке, который будет называться «spisok_faylov.txt».
Готовый список файлов
Перенос списка в программу Excel.
Шаг 1. Открыть текстовый документ.
Шаг 2. Выделить левой кнопкой мыши список.
Выделение списка
Шаг 3. Нажав правой кнопкой мыши по выделению выбрать пункт «Копировать»
Копирование перечня
Шаг 4. Открыть документ Excel.
Вставка в Excel
Шаг 5 Кликнуть правой кнопкой мыши в любую ячейку и выбрать из выпадающего меню пункт «Вставить»
Резултат копирования списка
Если вы хотите создать список имен файлов в каталоге на листе, вы можете обработать следующие способы, чтобы быстро получить список файлов из каталога на листе.
- Перечислите все имена файлов из папки на листе с помощью веб-браузера
- Перечислите все имена файлов из папки на листе с помощью формулы
- Перечислите все имена файлов из папки на листе с помощью кода VBA
- Список всех имен файлов из папки и подпапок на листе с мощной функцией
Перечислите все имена файлов из папки на листе с помощью веб-браузера
Если вы хотите вывести список файлов в папке с помощью веб-браузера, вам следует убедиться, что у вас установлен один из веб-браузеров (Firefox, Opera и Google Chrome) установлен на вашем компьютере. Предположим, вам нужно перечислить файлы следующей папки на листе, см. Снимок экрана:
1. Зайдите, чтобы скопировать путь к папке (Папка Test) в проводнике. Например, путь к этой папке: C: \ Users \ AddinTestWin10 \ Desktop \ Folder Test .
2. Откройте один из веб-браузеров (FireFox, Opera и Google Chrome), вставьте путь к папке в адресную строку и нажмите Enter ключ. Смотрите скриншот:
3. Нажмите Ctrl + для выбора всего содержимого в веб-браузере и нажмите Ctrl + C скопировать их.
4. Откройте Excel и вставьте напрямую (используя Ctrl + V ярлыки для вставки) их на лист. Смотрите скриншот:
- 1. С помощью этого метода могут отображаться только файлы в основной папке, файлы в подкаталоге не могут быть перечислены.
- 2. Гиперссылки имен файлов недоступны.
Перечислите все имена файлов из папки на листе с помощью формулы
В Excel вы также можете использовать формулу для получения списка всех имен файлов или типа psecifc имен файлов из папки, выполните следующие действия:
1. Скопируйте и вставьте путь к файлу в ячейку, а затем введите \* после пути к файлу, как показано ниже:
2, Затем нажмите Формула > Менеджер имен, см. снимок экрана:
3. В Менеджер имен диалоговое окно, нажмите Новое кнопку, см. снимок экрана:
4. В выскочившем Новое имя диалоговом окне укажите имя в поле Имя и фамилия текстовое поле, а затем введите приведенную ниже формулу в Относится к текстовое поле, см. снимок экрана:
Внимание: В этой формуле Sheet1! $ A $ 1 - это ячейка рабочего листа, содержащая путь к файлу, введенный на шаге 1.
5. А затем нажмите OK > Закрыть чтобы закрыть диалоговые окна, а затем введите следующую формулу в пустую ячейку, где вы хотите перечислить имена файлов, и перетащите ручку заполнения вниз, пока не отобразятся пустые ячейки, теперь все имена файлов в указанной папке перечислены, как показано ниже показан снимок экрана:
Внимание: В этой формуле Имена файлов это имя диапазона, которое вы создали на шаге 4, и A1 содержит ли ячейка путь к файлу.
- 1. Вы должны сохранить эту книгу как Excel Macro-Enabled Workbook формат, если вы хотите, чтобы формулы работали нормально после закрытия и повторного открытия файла.
- 2. Если вы хотите перечислить все файлы с определенным расширением, например, перечислить все имена файлов docx, в этом случае вам просто нужно использовать * docx * вместо *, аналогично для файлов xlsx используйте * xlsx *.
Перечислите все имена файлов из папки на листе с помощью кода VBA
Использование следующего VBA для вывода списка файлов в папке на листе:
1. Откройте рабочий лист и щелкните, чтобы выбрать ячейку, в которую вы хотите поместить имена файлов.
2. Удерживайте ALT + F11 ключи в Excel, и он открывает Microsoft Visual Basic для приложений окно.
3. Нажмите Вставить > Модулии вставьте следующий код в Модули Окно.
Код VBA: перечислить все имена файлов из папки на листе
4, Затем нажмите F5 ключ для запуска кода, новое окно Приложения будет отображаться. Выберите папку, в которой должны быть перечислены имена файлов.
5. Затем нажмите OK, файлы в конкретной папке перечислены на листе с гиперссылками. Смотрите скриншот:
Список всех имен файлов из папки и подпапок на листе с мощной функцией
Список имен файлов полезности Kutools for Excel можно легко создать список файлов из каталога на листе, как показано ниже. Нажмите, чтобы загрузить Kutools for Excel!
Примечание: Чтобы применить это Список имен файлов, во-первых, вы должны скачать Kutools for Excel, а затем быстро и легко примените эту функцию.
После установки Kutools for Excel, пожалуйста, сделайте так:
1. Откройте Excel, нажмите Кутулс Плюс > Импорт / Экспорт > Список имен файлов…, см. снимок экрана:
2. В Список имен файлов диалоговом окне выполните следующие операции:
(1.) Щелкните кнопка, чтобы указать папку, в которой находятся файлы, которые вы хотите перечислить;
(2.) Проверьте Включить файлы в подкаталоги возможность перечислить все имена файлов в подпапках или проверить Включать скрытые файлы и папки возможность отображать все имена скрытых файлов, а также имена файлов в скрытых папках;
(3.) Укажите тип файла, который вы хотите указать под Тип файлов раздел;
(4.) Выберите единицу размера файла для отображения из Единица размера файла раздел, который вам нужен.
(5.) Проверьте Создать гиперссылки вариант как вам нужно.
3. Нажмите OK. Он сгенерирует список файлов в каталоге или подкаталоге на новом листе. Смотрите скриншот:
Больше относительных статей:
- Создайте список всех имен рабочих листов из книги
- Предположим, у вас есть книга с несколькими листами, и теперь вы хотите перечислить все имена листов в текущей книге. Есть ли какой-нибудь быстрый способ создать список имен этих листов в Excel, не вводя их один за другим? В этом руководстве приведены инструкции о том, как составить список имен листов в Excel.
- Копирование или перемещение файлов из одной папки в другую на основе списка
- Если у вас есть список имен файлов в столбце на листе, и файлы находятся в папке на вашем компьютере. Но теперь вам нужно переместить или скопировать эти файлы, имена которых указаны на листе, из их исходной папки в другую, как показано на следующем снимке экрана. Как вы могли выполнить эту задачу так быстро, как вы можете в Excel?
- Получить список имен листов в Google Таблицах
- В этой статье я расскажу о некоторых методах получения имени текущего имени листа или списка имен листов в таблицах Google.
- Перемещение между листами с помощью раскрывающегося списка
- Предположим, у вас есть книга, содержащая несколько листов, теперь вам нужно создать раскрывающийся список или поле со списком, в котором перечислены все имена листов, и когда вы выбираете одно имя листа из раскрывающегося списка, он немедленно переходит на этот лист. В этой статье я расскажу, как перемещаться между листами с помощью раскрывающегося списка в Excel.
Лучшие инструменты для работы в офисе
Kutools for Excel решает большинство ваших проблем и увеличивает вашу производительность на 80%
- Снова использовать: Быстро вставить сложные формулы, диаграммы и все, что вы использовали раньше; Зашифровать ячейки с паролем; Создать список рассылки и отправлять электронные письма .
- Бар Супер Формулы (легко редактировать несколько строк текста и формул); Макет для чтения (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон .
- Объединить ячейки / строки / столбцы без потери данных; Разделить содержимое ячеек; Объединить повторяющиеся строки / столбцы . Предотвращение дублирования ячеек; Сравнить диапазоны .
- Выберите Дубликат или Уникальный Ряды; Выбрать пустые строки (все ячейки пустые); Супер находка и нечеткая находка во многих рабочих тетрадях; Случайный выбор .
- Точная копия Несколько ячеек без изменения ссылки на формулу; Автоматическое создание ссылок на несколько листов; Вставить пули , Флажки и многое другое .
- Извлечь текст , Добавить текст, Удалить по позиции, Удалить пробел ; Создание и печать промежуточных итогов по страницам; Преобразование содержимого ячеек в комментарии .
- Суперфильтр (сохранять и применять схемы фильтров к другим листам); Расширенная сортировка по месяцам / неделям / дням, периодичности и др .; Специальный фильтр жирным, курсивом .
- Комбинируйте книги и рабочие листы ; Объединить таблицы на основе ключевых столбцов; Разделить данные на несколько листов ; Пакетное преобразование xls, xlsx и PDF . Pivot Table Grouping by week number, day of week and more. Show Unlocked, Locked Cells by different colors; Highlight Cells That Have Formula/Name . -->
- Более 300 мощных функций . Поддерживает Office / Excel 2007-2019 и 365. Поддерживает все языки. Простое развертывание на вашем предприятии или в организации. Полнофункциональная 30-дневная бесплатная пробная версия. 60-дневная гарантия возврата денег.
Вкладка Office: интерфейс с вкладками в Office и упрощение работы
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint , Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!
Читайте также: