Ինչպե՞ս Excel- ում բազմաթիվ ֆայլերի անուններ ներմուծել բջիջներ:
Ենթադրելով, որ դուք ունեք մի պանակ հարյուրավոր ֆայլերով, և այժմ դուք ցանկանում եք ներմուծել այս ֆայլերի անունները աշխատանքային թերթի բջիջներ: Մեկ առ մեկ պատճենելը և տեղադրելը շատ ժամանակ կծախսի: Այս հոդվածում ես կխոսեմ մի քանի արագ հնարքների մասին, որոնք կօգնեն ձեզ ֆայլերի բազմաթիվ անուններ թղթապանակից ներմուծել աշխատանքային թերթիկ:
Ներմուծեք բազմաթիվ ֆայլերի անուններ VBA կոդով աշխատաթերթի բջիջների մեջ
Ներմուծեք բազմաթիվ ֆայլերի անուններ աշխատաթերթի բջիջների մեջ Kutools- ի համար Excel- ի համար
Ներմուծեք բազմաթիվ ֆայլերի անուններ VBA կոդով աշխատաթերթի բջիջների մեջ
Հետևյալ VBA կոդը կարող է օգնել ձեզ ներմուծել ֆայլի անունները, ֆայլի ընդլայնումները և թղթապանակի անունը աշխատանքային թերթի բջիջներում, խնդրում ենք անել հետևյալ քայլերով.
1, Գործարկել նոր աշխատանքային թերթ, որը ցանկանում եք ներմուծել ֆայլի անունները:
2, Պահեք պահեք ALT + F11 բացել ստեղները Microsoft Visual Basic հավելվածների համար պատուհան.
3: Սեղմեք Տեղադրել > Մոդուլներ, և տեղադրեք հետևյալ կոդը Մոդուլներ Պատուհանը:
VBA կոդ. Ներմուծեք բազմաթիվ ֆայլերի անուններ աշխատանքային թերթի բջիջների մեջ
Sub GetFileList()
'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)
ActiveSheet.Cells(1, 1) = "Folder name"
ActiveSheet.Cells(1, 2) = "File name"
ActiveSheet.Cells(1, 3) = "File extension"
i = 1
For Each xFile In xFolder.Files
i = i + 1
ActiveSheet.Cells(i, 1) = xPath
ActiveSheet.Cells(i, 2) = Left(xFile.Name, InStrRev(xFile.Name, ".") - 1)
ActiveSheet.Cells(i, 3) = Mid(xFile.Name, InStrRev(xFile.Name, ".") + 1)
Next
End Sub
4. Այնուհետեւ սեղմեք F5 այս կոդը կատարելու համար ստեղնը, և դուրս եկած Թերթել պատուհանում ընտրեք այն թղթապանակը, որը ցանկանում եք ներմուծել ֆայլի անունների ձևը:
5. Եվ այնուհետեւ կտտացրեք OK կոճակը, և դուք կստանաք հետևյալ արդյունքը.
Նշում： Եթե ձեր հատուկ թղթապանակում կան ենթապանակներ, ենթապանակներում ֆայլերի անունները չեն ներկրվի:
Ներմուծեք բազմաթիվ ֆայլերի անուններ աշխատաթերթի բջիջների մեջ Kutools- ի համար Excel- ի համար
Եթե Ձեզ անհրաժեշտ է ներմուծել ֆայլի անունները ինչպես թղթապանակում, այնպես էլ ենթապանակներում, խնդրում եմ մի անհանգստացեք, հետ Excel- ի համար նախատեսված գործիքներ'S Ֆայլի անվանացանկ օգտակար, դուք կարող եք հեշտությամբ ներմուծել բոլոր ֆայլերի անունները որոշակի պանակում, ներառյալ ենթապանակները:
| Excel- ի համար նախատեսված գործիքներ : ավելի քան 300 հարմար Excel հավելվածներով, 30 օրվա ընթացքում առանց սահմանափակումների փորձեք անվճար. |
Տեղադրելուց հետո Excel- ի համար նախատեսված գործիքներխնդրում եմ արեք հետևյալը.
1: Սեղմեք Kutools Plus> Ներմուծման արտահանման > Ֆայլի անվանացանկ, տես նկարի նկարը.
2, Մեջ Ֆայլի անվանացանկ երկխոսության տուփ, կատարեք հետևյալ գործողությունները.
(1.) Կտտացրեք 
կոճակը թղթապանակը ընտրելու համար այն ֆայլերը, որոնք ցանկանում եք ներմուծել;
(2.) Ստուգեք Ներառեք ֆայլերը ենթագրացուցակներում ենթապանակների ֆայլերի անունները ներմուծել;
(3.) Նշեք այն ֆայլերի տեսակը, որոնք ցանկանում եք ներմուծել այն կետի տակ Ֆայլերի տեսակը Բաժին;
(4.) Այստեղից ընտրեք մեկ ֆայլի չափի միավոր, որը ցանկանում եք ցուցադրել Ֆայլի չափի միավոր Բաժին;
(5.) Եթե ցանկանում եք ֆայլերի անուններն ու պանակները հիպերհղել, ստուգեք Ստեղծեք հիպերհղումներ տարբերակ.
3, Պարամետրերն ավարտելուց հետո սեղմեք OK կոճակը, և ֆայլի անունները ինչպես թղթապանակում, այնպես էլ ենթապանակներում ներմուծվում են նոր աշխատանքային թերթի մեջ, ինչպես ցույց է տրված հետևյալ նկարը.
TipsԵթե պարզապես ցանկանում եք ներմուծել մեկ նշված տիպի ֆայլի անուններ որոշակի պանակից, կարող եք ստուգել Մատնանշել տարբերակը Ֆայլի անվանացանկ երկխոսություն և մուտքագրեք դրա մեջ ֆայլի ընդլայնումը, ապա այն միայն ներմուծելու է նշված տիպի ֆայլերի անունները և՛ թղթապանակից, և՛ ենթապանակներից:
Կտտացրեք ՝ այս ֆայլի անվանացանկի հատկության մասին ավելին իմանալու համար
Ներբեռնեք և անվճար փորձեք Kutools- ը Excel- ի համար:
Դեմո. Ներմուծեք բազմաթիվ ֆայլերի անուններ աշխատաթերթի բջիջներում Kutools- ի համար Excel- ի համար
Առնչվող հոդվածներ քանակը:
Ինչպե՞ս ցուցակի բոլոր ֆայլերը թղթապանակում և ենթապանակներում ներառել աշխատանքային թերթ:
Ինչպե՞ս ցուցակագրել բոլոր ֆայլի անունները թղթապանակում և Excel- ում ստեղծել դրանց համար հղումներ:
Գրասենյակի արտադրողականության լավագույն գործիքները
Լրացրեք ձեր Excel-ի հմտությունները Kutools-ի հետ Excel-ի համար և փորձեք արդյունավետությունը, ինչպես երբեք: Kutools-ը Excel-ի համար առաջարկում է ավելի քան 300 առաջադեմ առանձնահատկություններ՝ արտադրողականությունը բարձրացնելու և ժամանակ խնայելու համար: Սեղմեք այստեղ՝ Ձեզ ամենաշատ անհրաժեշտ հատկանիշը ստանալու համար...
Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք
- Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
- Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
- Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր:
