Прескочи на основното съдържание

Как да изброя всички имена на файлове от папка и подпапки в работен лист?

Автор: Техническа поддръжка Последна промяна: 2024-03-01

Ако искате да генерирате списък с имена на файлове в директория в работен лист, можете да обработите следните начини за бързо получаване на списък с файлове от директория в работен лист.


Избройте всички имена на файлове от папка в работен лист с помощта на уеб браузър

Ако искате да изброявате файлове в папка с помощта на уеб браузъра, трябва да се уверите, че имате един от уеб браузърите (Firefox, Opera и Google Chrome), инсталиран на вашия компютър. Да предположим, че трябва да изброите файлове от следната папка в работния лист, вижте екранната снимка: 

1. Отидете, за да копирате пътя на папката (папка тест) в Explorer. Например пътят на тази папка е: C:\Users\AddinTestWin10\Desktop\Folder Test.

2. Отворете един от уеб браузърите (FireFox, Opera и Google Chrome) и поставете пътя на папката в адресната лента и натиснете Въведете ключ. Вижте екранна снимка:

3. Щракнете Ctrl + A за да изберете цялото съдържание в уеб браузъра и натиснете Ctrl + C да ги копирате.

4. Отворете Excel и директно поставете (използвайки Ctrl + V преки пътища за поставяне) ги в работен лист. Вижте екранна снимка:

бележки:
  • 1. С този метод само файловете в главната папка могат да бъдат показани, файловете в поддиректорията не могат да бъдат изброени.
  • 2. Хипервръзките на имената на файловете не са налични.

Избройте всички имена на файлове от папка в работен лист, като използвате формула

В Excel можете също да използвате формула, за да получите списък с всички имена на файлове или psecifc тип имена на файлове от папка, моля, направете следните стъпки:

1. Копирайте и поставете пътя на файла в клетка и след това въведете \* след пътя на файла, както е показано на екранната снимка по-долу:

2, След това кликнете върху Формула > Мениджър на имена, вижте екранна снимка:

3. В Мениджър на имена кликнете върху НОВ бутон, вижте екранната снимка:

4. В изскочилото Ново име диалогов прозорец, задайте име в Име текстово поле и след това въведете формулата по-долу в Отнася се до текстово поле, вижте екранна снимка:

=FILES(Sheet1!$A$1)

Забележка: В тази формула, Лист1!$A$1 клетката на работния лист съдържа пътя на файла, който сте въвели в стъпка 1.

5. И след това щракнете OK > Близо за да затворите диалоговите прозорци и след това въведете следната формула в празна клетка, където искате да изброите имената на файловете, и плъзнете ръката за запълване надолу, докато се покажат празни клетки, сега всички имена на файлове в посочената папка са изброени по-долу показана екранна снимка:

=IFERROR(INDEX(Filenames,ROW(A1)),"")

Забележка: В тази формула, Имена на файлове е името на диапазона, който сте създали в стъпка 4, и A1 клетката съдържа пътя на файла.

бележки:
  • 1. Трябва да запишете тази работна книга като Работна книга с активирани макроси на Excel формат, ако искате формулите да работят добре след затваряне и повторно отваряне на файла.
  • 2. Ако искате да изброите всички файлове с конкретно разширение, като например изброите всички имена на docx файлове, в този случай просто трябва да използвате *docx* вместо *, по същия начин за xlsx файлове, моля, използвайте *xlsx*.


Избройте всички имена на файлове от папка в работен лист, като използвате VBA код

Използване на следния VBA за изброяване на файлове в папка в работен лист:

1. Отворете работен лист и щракнете, за да изберете клетка, в която искате да поставите имената на файловете.

2. Задръжте натиснат ALT + F11 клавиши в Excel и отваря Microsoft Visual Basic за приложения прозорец.

3. Щракнете Поставете > Модулии поставете следния код в Модули Window.

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. След това кликнете OK, файловете в конкретната папка са изброени в работния лист с хипервръзки. Вижте екранна снимка:

Забележка: Само имената на файловете в главната папка могат да бъдат изброени.

Избройте всички имена на файлове от папка и подпапки в работен лист с мощна функция

- Списък с имена на файлове полезност на Kutools за Excel може лесно да генерира списък с файлове от директория в работен лист, както е показано по-долу в демонстрацията.    Щракнете, за да изтеглите Kutools за Excel!

doc списък с всички имена на файлове 9

Забележка:За да приложите това Списък с имена на файлове, първо, трябва да изтеглите Kutools за Excelи след това приложете функцията бързо и лесно.

След инсталиране Kutools за Excel, моля, направете следното:

1. Отворете Excel, щракнете Kutools плюс > Внос / Износ > Списък с имена на файлове…, виж екранна снимка:

2. В Списък с имена на файлове диалогов прозорец, направете следните операции:

(1.) Щракнете бутон за списък с документи и файлове бутон за указване на папката, която съдържа файловете, които искате да изброите;

(2.) Проверете Включете файлове в поддиректории опция за изброяване на всички имена на файлове в подпапки или проверете Включете скрити файлове и папки опция за изброяване на всички имена на скрити файлове, както и имена на файлове в скрити папки;

(3.) Посочете типа файл, който искате да посочите под Тип файлове раздел;

(4.) Изберете една единица за размер на файла, която искате да покажете от Единица за размер на файла раздел, от който се нуждаете.

(5.) Проверете Създайте хипервръзки опция, колкото ви трябва.

3. Щракнете OK. Той ще генерира списък с файлове в директорията или поддиректорията в нов работен лист. Вижте екранна снимка:

Щракнете, за да изтеглите Kutools за Excel и безплатна пробна версия сега!


Още относителни статии:

  • Създайте списък с всички имена на работни листове от работна книга
  • Да предположим, че имате работна книга с множество работни листове, сега искате да изброите всички имена на листове в текущата работна книга, има ли някакъв бърз метод за създаване на списък с имена на тези листове в Excel, без да ги въвеждате едно по едно? Този урок дава инструкции как да изброявате имена на работни листове в Excel.
  • Копирайте или преместете файлове от една папка в друга въз основа на списък
  • Ако имате списък с имена на файлове в колона в работен лист и файловете се намират в папка на вашия компютър. Но сега трябва да преместите или копирате тези файлове, чиито имена са изброени в работния лист от оригиналната им папка в друга, както е показано на следната екранна снимка. Как бихте могли да завършите тази задача възможно най-бързо в Excel?
  • Придвижвайте се между работни листове с помощта на падащ списък
  • Да предположим, че имате работна книга, която съдържа множество работни листове, сега трябва да създадете падащ списък или разгъващ се списък, който изброява всички имена на листове и когато изберете име на един лист от падащия списък, той веднага ще скочи към този лист. Тази статия ще представя как да навигирате между работни листове с помощта на падащ списък в Excel.

Най-добрите инструменти за продуктивност в офиса

🤖 Kutools AI помощник: Революционизирайте анализа на данни въз основа на: Интелигентно изпълнение   |  Генериране на код  |  Създаване на персонализирани формули  |  Анализирайте данни и генерирайте диаграми  |  Извикване на функциите на Kutools...
Популярни функции: Намерете, маркирайте или идентифицирайте дубликати   |  Изтриване на празни редове   |  Комбинирайте колони или клетки без загуба на данни   |   Кръг без формула ...
Супер търсене: VLookup с множество критерии    VLookup с множество стойности  |   VLookup в няколко листа   |   Размито търсене ....
Разширен падащ списък: Бързо създаване на падащ списък   |  Зависим падащ списък   |  Падащ списък с множество избори ....
Мениджър на колони: Добавете конкретен брой колони  |  Преместване на колони  |  Превключване на състоянието на видимост на скритите колони  |  Сравнете диапазони и колони ...
Препоръчани функции: Мрежов фокус   |  Изглед на дизайна   |   Голям формула бар    Мениджър на работни книги и листове   |  Библиотека с ресурси (Автоматичен текст)   |  Избор на дата   |  Комбинирайте работни листове   |  Шифроване/декриптиране на клетки    Изпращайте имейли по списък   |  Супер филтър   |   Специален филтър (филтър получер/курсив/зачертано...) ...
Топ 15 комплекта инструменти12 Текст Инструменти (добавяне на текст, Премахване на символи, ...)   |   50 + Графика Видове (диаграма на Гант, ...)   |   40+ Практичен формули (Изчислете възрастта въз основа на рождения ден, ...)   |   19 вмъкване Инструменти (Въведете QR код, Вмъкване на картина от пътя, ...)   |   12 Конверсия Инструменти (Числа към думи, Валутен обмен, ...)   |   7 Обединяване и разделяне Инструменти (Разширено комбиниране на редове, Разделени клетки, ...)   |   ... и още

Усъвършенствайте уменията си за Excel с Kutools за Excel и изпитайте ефективност, както никога досега. Kutools за Excel предлага над 300 разширени функции за повишаване на производителността и спестяване на време.  Щракнете тук, за да получите функцията, от която се нуждаете най-много...

Описание


Раздел Office Внася интерфейс с раздели в Office и прави работата ви много по-лесна

  • Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
  • Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
  • Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!
Comments (80)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
I've been using vb6 since years. That was very easy to copy all the file names of directory and sub-directory. It was possible to manipulate the name of the files as you wanted. Unfortunately, it has been abandonned...
This comment was minimized by the moderator on the site
Is there any way to get a list of files in a Microsoft Teams/SharePoint folder including sub folders? I can synch the folder locally but then the hyperlinks generated are local. I really want the links to the Teams location for purpose of sharing with the team.
This comment was minimized by the moderator on the site
السلام عليكم ...شكرا جزيلا وفقكم الله لكل خير...معلومات قيمة ومفيدة ..نفعتني كثيرا وفرحت بها كثيرا
This comment was minimized by the moderator on the site
I'm 63 years old. Have been looking for how to do this this (directory to Excel to with attributes) for years! Tried many methods so complicated that I had to learn new programming language (i.e. command prompt and command shell, I am subject matter expert, IT user; not dedicated IT). But thought it should be simple so kept looking. AND HERE IT IS!! So easy my now elderly brain gets it. Thank you, thank you. Bless you! All hail extendoffice! You rock.
Hmmm. Does anybody else have programming how-tos on their bucket list?
This comment was minimized by the moderator on the site
How do you automatically refresh the list after you change a file name?
This comment was minimized by the moderator on the site
you are genius
This comment was minimized by the moderator on the site
How to list all file names from a SharePoint link into a Worksheet?
This comment was minimized by the moderator on the site
HI, does this line give an error if you folder path is longer?

ActiveSheet.Hyperlinks.Add Cells(I, 1), xFile.Path, , , xFile.Name
This comment was minimized by the moderator on the site
Amazing trick ! Unfortunately is working only for certain folders and I couldnt identify whats the selection criteria. I only can tell that Microsoft Excel Security Notice says "Microsoft Office has identify a potential security concern. This location may be unsafe. C:\C:\Users\popal". I dont understand where is "C:\C:" comming from but I m getting the same "C:\C:" when I hover the mouse over the hypelink. Thanks for any suggestion
This comment was minimized by the moderator on the site
very very useful help and clear instructions. appreciate the time spent on this . thanks.
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations