[Resolvido]DoCmd - O objeto é obrigatório - erro 424

Estou tentando importar uma planilha excel para access usando o objeto DoCmd e está me retornando erro 424 - O objeto é obrigatório.

O Comando: DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, strTable, strPathFile, True.

Alguém poderia me ajudar?

Obrigado

Olá Manoel, bemvindo ao fórum.
Verifique os variáveis strTable e strPathFile.
Para teste coloque diretamente os nomes no código.
Veja ajuda da Microsoft.
Abraço

Obrigado pelo retorno.

Mas não estou conseguindo. Continuo com o erro 424.

Veja os detalhes da importação que estou tentando fazer:

Origem
arquivo: C:\Users\manoel.jose\Documents\VBA\segregacao.xlsx

Destino:
DBname: DbInstrucao; tabela: segreg; local: C:\Users\manoel.jose\Documents\VBA

Comando:
DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, "segreg", "C:\Users\manoel.jose\Documents\VBA\segregacao.xlsx", True.

Minhas dúvidas: no comando informo apenas a tabela. Não faço referência ao Dbname e nem ao seu caminho. Está correto isto?

Olá, para despistar, coloque os ficheiros numa pasta de teste, exemplo:

c:\TesteExcel

Se possível poste ficheiro de exemplo, indique a versao do SO e Office usado.
Abraço

Olá, fiz pequeno teste com Access2010.
Descompacte para uma pasta e teste.
Abraço

Teixeira,
obrigado pelo empenho.

Mas tenho restrições para baixar a partir do seu link (coisas de segurança).

Seria muito pedir pra vc anexar no skype? (manecosto).

Obrigado

Olá, o exemplo é simples.
Apenas para despistar, não informou a sua versão do SO e Access.
Estou no telemóvel, se poder ser por email, mande o seu email por mensagem privada.
A menos que algum colega aqui do fórum tenha a amabilidade de baixar o exemplo e enviar para você por Skype.
Abraço

Olá, acabei de enviar via skype.
Não costumo usar e desconhecia a funcionalidade de enviar ficheiros.
Sempre aprender.
Abraço

Um pitaco;

Atenção que o erro 424 é porque não encontra o caminho do ficheiro.

Reveja com calma o caminho "C:\Users\manoel.jose\Documents\VBA\segregacao.xlsx"

Opa,

ainda não recebi.

Enviou pro login correto? (manecosto)

Olá, sim foi para esse nick.
Veja se consegue baixar aqui.
Abraço

Para executar TransferSpreadsheet depende de onde o VBA foi inicializado :

1 - VBA a partir do DBACCESS :

DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, "tableName", "C:\...\arq.xlsx", True

'Obs.: aqui você já está conectado no db "C:\....\DbName.accdb" por isso nenhuma referência é feita ao db

2 - VBA a partir do Excel:

Dim appAccess As Access.Application 'referência à "Microsoft Access 15.0 Object Library"

Set appAccess = CreateObject("Access.Application")
appAccess.OpenCurrentDatabase "C:\....\DbName.accdb", False ' Aqui vc precisa fazer a conexão com o db

appAccess.DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, "tableName", "C:\...\arq.xlsx", True
appAccess.CloseCurrentDatabase

Olá Manoel, obrigado pelo retorno.
Os utilizadores do fórum agradecem.
Abraço