[Resolvido]Importar arquivo Excel a cada atualização da pasta

Olá!

Eu possuo um banco de dados que possui uma tabela com o saldo de empresas.

Atualmente, eu atualizo essa tabela manualmente através da importação de um arquivo em excel q recebo.
Os arquivos em excel q recebo ficam armazenados em uma pasta.


Gostaria de saber como crio uma macro ou um código que atualiza essa tabela automaticamente toda vez q essa pasta recebe um novo arquivo em excel.


Tenho outra dúvida: dá problema se a pasta tiver arquivos em outros formatos? Pq recebo o excel junto com um pdf e salvo tudo junto.

Tópico movido da sala de formulários para a sala de Módulos e VBA. Afinal, procura-se por código que automatize importação de arquivos.

Título e mensagem alteradas. Onde dizia "exportação" (informações enviadas) agora diz "importação" (informações trazidas).

Ok, aguardando resposta

carolinesilva115, avançou com seu projeto?

Aguardamos retorno...

Não consegui, infelizmente

Criei um código para pegar o arquivo manualmente.

Código:


Private Sub Comando145_Click()
  Dim Ficheiro As String
   
    With Application.FileDialog(msoFileDialogOpen)
        .AllowMultiSelect = False
        .Filters.Clear
        .Filters.Add "Excel", "*.xls,*.xlsx"
        .FilterIndex = 1

        If .Show = 0 Then
            'Cancelado
        Else
            Ficheiro = .SelectedItems(1)
            DoCmd.DeleteObject acTable, "Tabela"
            ' importa 9 colunas de uma folha de excel com os nomes dos campos na primeira linha
            DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel12, "Tabela", Ficheiro, True, "A:I"
            MsgBox "O arquivo foi importado com sucesso!", , "Atualização de dados"
        End If

    End With


End Sub