Como abrir rapidamente todos os arquivos do Excel de uma pasta?

Neste artigo, apresento a macro para abrir todas as pastas de trabalho de uma pasta específica.

Abrir todas as pastas de trabalho em uma pasta com VBA

Listar todos os nomes de arquivos de uma pasta específica com o Kutools para Excel

Abrir todas as pastas de trabalho em uma pasta com VBA

1. Pressione as teclas Alt + F11 para abrir a janela Microsoft Visual Basic for Applications.

2. Clique em Inserir > Módulo e cole o código abaixo no script.

VBA: Abrir todos os arquivos do Excel em uma pasta

Sub OpenFiles()
'UpdateByExtendoffice20160623
    Dim xStrPath As String
    Dim xFileDialog As FileDialog
    Dim xFile As String
    On Error Resume Next
    Set xFileDialog = Application.FileDialog(msoFileDialogFolderPicker)
    xFileDialog.AllowMultiSelect = False
    xFileDialog.Title = "Select a folder [Kutools for Excel]"
    If xFileDialog.Show = -1 Then
        xStrPath = xFileDialog.SelectedItems(1)
    End If
    If xStrPath = "" Then Exit Sub
    xFile = Dir(xStrPath & "\*.xlsx")
    Do While xFile <> ""
        Workbooks.Open xStrPath & "\" & xFile
        xFile = Dir
    Loop
End Sub

3. Pressione F5 uma caixa de diálogo aparece para selecionar a pasta da qual deseja abrir todas as pastas de trabalho. Veja a captura de tela:

4. Clique em OK, e todas as pastas de trabalho na pasta específica serão abertas.

Listar todos os nomes de arquivos de uma pasta específica com o Kutools para Excel

Além de abrir arquivos em uma pasta, você já tentou listar todos os nomes de arquivos de uma pasta específica? Com a ferramenta Lista de Nomes de Arquivos do Kutools para Excel, você pode listar rapidamente todos os tipos ou um tipo específico de arquivos em uma pasta.

1. Clique em Kutools Plus > Importar & Exportar > Lista de Nomes de ArquivosVeja a captura de tela:

2. Na caixa de diálogo Lista de Nomes de Arquivos selecione a pasta da qual deseja listar os arquivos, especifique o tipo de arquivo que deseja listar e, em seguida, especifique a unidade do tamanho do arquivo conforme necessário. Se desejar, você pode criar hiperlinks para os nomes dos arquivos que serão listados. Veja a captura de tela:

3. Clique em Oke todos os arquivos na pasta específica serão listados em uma nova planilha da pasta de trabalho ativa. Veja a captura de tela:

Demonstração: Listar Todos os Nomes de Arquivos de Uma Pasta Usando o Kutools para Excel