Importação Excel para Access

Boa noite!

Estou com um projeto novo e preciso importar dados de uma planilha do excel para uma tabela do access.

Como fazer isso via vba para o usuário só ter que clicar num botão e o resto é tudo automático!

Preciso, se possível, de uma explicação desde a formatação no excel até os tipos de campos no access para ficar correto o calculo posterior dos valores importados

https://www.maximoaccess.com/t26911-importar-planilha-excel-informando-a-tabela-de-destino-a-folha-sheets-de-origem-e-localizando-o-documento-excel


Adapte e remova a interação com o Usuario...

Setando o nome da tabela direto no codigo.

Grande Fabio!

Isto funciona em Access 2000?

Eita... 2000! Bom so testando mesmo amigo... Nao tenho aqui pra testar rererererere

Beleza, testarei!

De qlqr modo, tentei adaptar e não consegui bem!
A planilha do excel precisa ficar aberta?

Me explique onde e o que editar para meu uso.

A planilha nao precisa ficar aberta...

Basta localizar a planilha, selecionar a tabela de destino dos dados, e pronto.

Os Nomes de Campos devem ser iguais... na tabela access e Excel

Primeiro importe o do exemplo, depois teste no seu...

Da forma como esta esse Imporador nao precisa mudar nada.

Basta no Seu BD ter a tabela de destino com os Mesmos campos da tabela excel...

Perfeito, testei no Access 2013 e funcionou ótimo!

Mas o Access 2000 não abre arquivo ACCDB

Nao amigo, nao abre mesmo!

Pra isso abra com o 2013, va la em salvar como>>> Selecione .mdb (Access 2000) ou 2002 a 2003. Ambos sao no Formato .mdb

Mudei o arquivo de lugar e não reconheceu o Excel

Ao extrair o arquivo, o mesmo ficou em download C:\Users\MEU USUARIO\Downloads\IMPORTAR PLANILHA EXCEL Sol. Valores

Mas ao passar para outra maquina num caminho da rede ele dá erro.

Não achei no VBA opção de leitura do arquivo, pode me orientar? (Já convertido para o Access 2000)

O que exatamente esta na maquina da Rede?
Pois eu fiz teste aqui assi:

Coloquei a planilha excel em uma maquina da rede. Abri o Programa na minha maquina, localizei a planilha da na outra maquina e importou direitinho.

Aqui no trabalho tenho 2 redes diferentes.

Todos os arquivos estão numa maquina e numa rede X, a internet está na rede Y porém o arquivo se encontra localmente.

Ao mudar o arquivo pelo pendrive para a maquina com rede X, ao tentar selecionar a aba para importação ele dá erro em

Código:

Dim td As TableDef

, o mesmo ocorre para o campo seguinte dando erro em

Código:

Dim appExcel As Excel.Application

Os dois arquivos estão no mesmo lugar

Estranho amigo, pois ja movi ele pra todo quanto foi lado aqui e nada do erro o....

Descompacta direto no LOcal onde vai usar...

Fiz isso, numa máquina funciona (win 7 e access 2013) na outra não (win 8 e access 2000)

Acredito que seja a versão do ACCESS, mas não tenho como mudar, infelizmente.

Existe alguma alternativa???

Amigo, Tenta executar somente o codigo de importação, informando os dados direto no Codigo para ver se vai...

DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, "NomeTabela", "C:\NomePlanilha.xls", True

Se funcionar, então vc adapta o exemplo, removendo a parte que pergunta Qual Planilha(Sheets) sera importada, pois talvez seja esse o problema com o 2000.

Nada....

Sem ideias amigo...
Mas da uma vasculhada no forum, tem varias formas de fazer isso... Porem a maioria e com esse metodo...