Como copiar os nomes dos ficheiros e pastas de todo o directório para a folha excel

Se quiser fazer isto manualmente, copie o caminho da pasta para a barra de endereços do seu navegador Google Chrome e prima Enter.

Os ficheiros e subpastas presentes nessa pasta serão listados nessa página.

Select all (CTRL + A), Copy (CTRL + C) and Paste (CTRL + V) the list into the Excel sheet.

Se você se sente confortável com programação no Excel, crie uma planilha chamada Nomes de Arquivos em sua planilha, Digite o nome da Pasta na célula B2 e Execute o seguinte código no Editor VBA do Excel. Filenames in that folder will be extracted into that worksheet

1. Sub ListFileNames() 
2. Dim X As Object, XNC As Object 
3. Dim Y As Integer 
4. Set X = CreateObject("Scripting.FileSystemObject") 
5. Set XNC = X.GetFolder(Range("B2").Value) 
6. For Each Z In XNC.Files 
7. Y = Y + 1 
8. Worksheets("File Names").Cells(Y + 1, 5).Value = Z.Name 
9. Worksheets("File Names").Cells(Y + 1, 6).Value = Z.Path  
10. Next 
11. End Sub