Como listar todos os nomes de arquivos em uma pasta e criar hiperlinks para eles no Excel?

Para o seu trabalho diário, você pode precisar importar vários nomes de arquivo de uma pasta para uma planilha e criar hiperlinks para cada arquivo de forma que abra o arquivo de forma rápida e fácil. Talvez você possa copiar e colar os nomes dos arquivos e criar um hiperlink para eles um por um manualmente, mas, isso vai perder muito tempo se houver centenas de arquivos na pasta. Hoje, falarei sobre alguns métodos rápidos e interessantes de lidar com esse trabalho.

Liste todos os nomes de arquivos em uma pasta e crie hiperlinks com o código VBA

Liste todos os nomes de arquivos em uma pasta e crie hiperlinks com o Kutools para Excel

Liste todos os nomes de arquivos em uma pasta e crie hiperlinks com o código VBA

Para listar e criar hiperlink com arquivos de uma pasta, o seguinte código VBA pode fazer um favor.

1. Ative uma nova planilha para colocar o resultado.

2. Segure o ALT + F11 chaves para abrir o Microsoft Visual Basic para Aplicações janela.

3. Clique inserção > Móduloe cole o seguinte código no Módulo Janela.

VBA: lista todos os nomes de arquivos em uma pasta e cria hiperlinks

Sub Example1()
'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. Então aperte F5 chave para executar este código e escolha a pasta em que deseja listar os arquivos do Explorar janela, veja a imagem:

5. Depois de especificar a pasta, clique em OK botão, e todos os arquivos na pasta específica foram listados na planilha ativa com hiperlinks, consulte a captura de tela:

Note: Se houver subpastas em sua pasta específica, os arquivos nas subpastas não serão listados.

Liste todos os nomes de arquivos em uma pasta e crie hiperlinks com o Kutools para Excel

Para listar todos os arquivos em uma pasta e suas subpastas e criar hiperlinks para cada arquivo, Kutools for Excel'S Lista de nomes de arquivo pode te fazer um favor. Com esse recurso, todos os arquivos da pasta e subpastas serão listados de uma vez com alguns atributos, como nome do arquivo, tamanho do arquivo, hora de criação, pasta de conteúdo e assim por diante.

Se você instalou Kutools for Excel, siga os seguintes passos:

1. Clique Kutools Plus > Importar e Exportar > Lista de nomes de arquivo, veja a captura de tela:

2. De acordo com o relatório Lista de nomes de arquivo caixa de diálogo, execute as seguintes operações:

(1.) Clique botão para selecionar a pasta na qual deseja listar os nomes dos arquivos;

(2.) Verifique Incluir arquivos em subdiretórios se você quiser listar nomes de arquivos em subpastas, marque Incluir arquivos e pastas ocultos se você deseja listar os arquivos ocultos;

(3.) Especifique os tipos de arquivo que deseja encontrar e listar no Tipo de arquivo seção;

(4.) Selecione a unidade de tamanho de arquivo que você deseja exibir;

(5.) Verifique Crie hiperlinks na parte inferior esquerda da caixa de diálogo.

Baixe o Kutools para Excel agora!

3. Então clique Ok botão, e todos os arquivos na pasta e subpastas foram listados em uma nova planilha com os hiperlinks de que você precisa, consulte a captura de tela:

Clique para saber mais detalhes sobre o utilitário Filename List ...

Baixe e teste grátis Kutools para Excel agora!

Demonstração: liste todos os nomes de arquivos em uma pasta e crie hiperlinks com o Kutools para Excel

Artigo relacionado:

Como listar todos os arquivos em uma pasta e subpastas em uma planilha?