Create the list of Files and Sub-folders in a Folder in Excel (Macro to list File Names)

Рет қаралды 31,166

5 жыл бұрын

Following 3 Excel Macros are explained in this video.
1. for listing the Files in a folder
2. for listing File Paths of files in a folder
3. for listing Subfolders in a folder
Subscribe to the channel for more
/ ajayanandxlncad
🟠 Books on Excel xlncad.com/excel-resources/
🟡 Get Office 365 Subscription microsoft-us.evyy.net/3NE6y
🔵 Download my free ebook on Excel Macros eepurl.com/gpT0RD
🟢 Read my articles on Excel xlncad.com/
🟣 Join my free course on Excel Tables www.udemy.com/course/tables-i...
Disclosure: Some of the links are Affiliate Links! If you buy something through one of those links, you won't pay a penny more, but we will get a small commission, which helps keep the lights on. Thank you for your support!
#MacroToExtractFileNames #MacroToListFiles #MacroToListFolder
#MacroToCreateListOfFiles

Пікірлер: 46

@ezelkarlkl1284 3 жыл бұрын

Thank you very much for this video. How can we do same things for FOLDER and SUBFOLDER names with file names ?

@vincysigma 3 жыл бұрын

Wonderful coding...Thank you Ajay.

@annafranz7354 4 жыл бұрын

Thank you so much. It was very helpful!

@AjayAnandXLnCAD 4 жыл бұрын

Glad it was helpful!

@adrianjeffery497 4 жыл бұрын

Thank you so much ! Its so informative

@AjayAnandXLnCAD 4 жыл бұрын

You're so welcome!

@danielle03201 3 жыл бұрын

Thank you this is very useful section. Can you do one section on how to list out all external links i.e folder , file name in one workbook please?

@rahulkamble4737 3 жыл бұрын

Really nice video.. I have use this code in my excel but and only getting name for folders but not getting name for all the sub folders or folder which is created under subfolder.. So for this any changes required in code please let me know

@anhnhatnguyet4628 3 жыл бұрын

Very great. Thank you

@krishnamaruthipeddinti2024 4 ай бұрын

Thank you verymuch . this is really nice and useful. I have a little further query. If 5 folders are having multiple sub folders. how should i take all sub folders in a side by side row? please help me to get the code.

@mail87suren 4 жыл бұрын

coudl it be possible to move multiple PDF files to respective subfolders which created in another path based on PDF name or number

@10morrisonka 5 жыл бұрын

Thank you, Ajay, for those sandwiches !! By the way, excellent work ! 💖💖💖

@AjayAnandXLnCAD 4 жыл бұрын

You are welcome, Miss. MonteNegro :)

@engineeringinspectionsirel1385 3 жыл бұрын

Thnx. Very good.

@adrianjeffery497 4 жыл бұрын

I also want the file date. How can we add that? Any help please? Thank you

@rajagopalanpk1546 4 жыл бұрын

Sir, Thank you very much . Can you also explain how do you populate the Serial Numbers in your Final execution of the macro automatically in Column D? It is not visible as a Macro Code.

@AjayAnandXLnCAD 4 жыл бұрын

I appreciate that you noticed it. The serial numbers in the Column D are created using 2 formulas. Formula in the cell D2 is =IF(E2"",1,"") if the cell E2 is not blank, return 1, otherwise return nothing. Formula in the cell D3 is =IF(E3"",D2+1,"") means if the cell E3 is not blank, return value in the cell D2+1, otherwise return nothing.

@OfficialRoot Жыл бұрын

@@AjayAnandXLnCAD на русском: D2 =ЕСЛИ(E2="";"";1) D3 =ЕСЛИ(E3="";"";D2+1)

@isaiass.1951 4 жыл бұрын

Thank you so much... i was trying do this today and my code didn't working anyway... I'm from Brazil and you channel is help me so much....

@AjayAnandXLnCAD 4 жыл бұрын

Glad to hear that. I recommend to visit my website for more VBA codes and a free ebook.

@hareshassanali3719 3 жыл бұрын

You are super bro ❤️

@sat1460 5 жыл бұрын

Nice video ... How to bank reconciliation with cashbook in Excel

@AjayAnandXLnCAD 5 жыл бұрын

Thank you for the feedback. I haven't tried cashbook reconciliation in Excel.

@smartthink9791 3 жыл бұрын

Good work plz share the excel workbook of this video

@AjayAnandXLnCAD 3 жыл бұрын

Will upload soon

@popeyefoodpoint 3 жыл бұрын

Same Option How to Set LibreOffice Calc

@zuhebkhan6973 4 жыл бұрын

Hi Sir Thank u so much for this Video... learnt a lot...plse give what formula used to get automatic SL# in the file.. Thanks in Advance

@AjayAnandXLnCAD 4 жыл бұрын

What do mean by automatic SL#

@amitoswal3193 3 жыл бұрын

Hi Ajay, When i try to run ListFileNames Macro it did not work. I tried exactly instructed in your video. I made sure Macro is enabled but still when pressed the Get File Names command button nothing happened.

@anmac6910 3 жыл бұрын

I want to create a list of the parent folder of my selection, including the subfolders and and deeper nested folders and all files across all levels of directories. I also want them to be organized by Date created, date modified, size, type, name and path. How can I do this with excel vba? I have windows 10 with microsoft 365. Thanks

@eaglebay7546 3 жыл бұрын

That's exactly what I am looking for.

@henrikabsalon 3 жыл бұрын

me to :-)

@OfficialMoin 3 жыл бұрын

What if I have 100 songs inside a folder and I want to extract the name and also the *_DURATION_* of each song in the excel file?

@daleramsawak4041 3 жыл бұрын

How can you get the Parent Folder Name, Sub-Folder Name and File Named (hyperlinked) in 3 columns in excel worksheet?

@AjayAnandXLnCAD 3 жыл бұрын

I suggest to use SPLITTER function (which I have explained in another video) or the Text to Columns feature for separating Folder and File names.

@helpinghandbyvipin2729 3 жыл бұрын

bro can u provide me a vba code that can open all the folder and extract all the specific file names for eg: only pdf.also can u provide me a code that can copy a folder path into destiontion path?

@pakkruikkru 5 жыл бұрын

Thank You Ajay For Considering My Request.

@AjayAnandXLnCAD 5 жыл бұрын

My pleasure 🖐️

@ashishbhatt06 3 жыл бұрын

How can we add Authors name of File ?

@haddadikram 2 жыл бұрын

Sub ListFileNames() Dim X As Object, XNC As Object Dim Y As Integer Set X = CreateObject("Scripting.filesystemobject") Set XNC = X.GetFolder(Range("B2").Value) For Each Z In XNC.Files Y = Y + 1 Worksheets("File Names").Cells(Y + 1, 5).Value = Z.Name Worksheets("File Names").Cells(Y + 1, 6).Value = Z.Path Next End Sub

@umeshadvani8195 4 жыл бұрын

Hi need your help in creating macro to send chaser mail Or create folder for 3000 line items.

@AjayAnandXLnCAD 4 жыл бұрын

Can you be more specific?

@RajeshKumar-sb7qn 2 жыл бұрын

It shows Run time error 438 It is not working

@ishwarsinghsisodiya7300 2 жыл бұрын

One more easier way to copy folders or files name in excel.... Just select all then press and hold Shift key + right click then look for copy as path and simply paste in excel. Too simple.