[Resolvido]Importação do excel para o Acces preciso pular uma linha

Na importação do excel para o Acces preciso pular uma linha que se refere ao cabeçalho.

Para Importar estou usando  o objeto    ====    DoCmd.TransferSpreadsheet    ====

porem, ao executar a proxima importação,como  existe a possibilidade de ter um nome de diferente em uma das colunas
ocorre erro(s).

Para que não seja necessário ficar alterado o cabeçalho das planilha, penso que o ideal é pular.

Dei uma analisada na rotina do XPTO que diz ter resolvido mas, não encontrei ou não entendi onde ele pulas
as linha.




Obrigado.

Olá amigo,
No meu caso eu tive que renomear o cabeçalho de acordo com os campos da tabela.
Daí o Access não apresenta o erro.

Se você colocar False, não importa o cabeçalho;

DoCmd.TransferSpreadsheet acImport, 3, "SuaTabela", "CaminhoCompletoDoFicheiro", False, "Range"

Tudo bem JPaulo,

Não funcionou.


Deu o seguinte erro: The Microsoft Access database engine could not find the object 'Range'. Make sure the object exists and that you spell its name and the path name correctly. If 'Range' is not a local object, check your network connection or contact the server administrator.

Até as que eu acertei o cabeçalho para executar deu erro.


DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel12, "ZV216", strDir, False, "Range"

strDir= Caminho (C:\xxxxxxx_xxxxx\xxxxxxx_arqvsBO\xx216\2015\jul15.XLSX)

Vamos a luta.

obrigado por enguanto

Claro que "Range" não existe, Range é o seu Range no excel, exemplo:  A1:D500

Se não quiser especificar o range, termine a instrução no False.

Paulo,

Ta dificil!!

erro: Unexpected error from external database driver (1).
sem o range.

com range: Field 'F1' doesn't exist in destination table 'ZV216.'
False, "A1:BC1" => linha 1 é a do cabeçalho.

Perguntou , tem alguma propriedade no access que grava do jeito que tiver?

ouvir dizer absoluposicion algo assim..

Mais uma vez obrigado..

Veja na minha assinatura o tópico "102 Codigos VBA Gratuitos" e procure por "Importar Excel para Access".

Paulo,

Para melhor o entendimento.

Se você quiser continuar com essa instrução, mas sem o cabeçalho, tem uma maneira de o fazer, mas não é a mais correta;

DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel12, "ZV216", strDir, False

1 - Você coloca False, não importa o cabeçalho dos campos, porém.

2- Terá de ter uma tabela, com os campos F1,F2,F3,F4,F5,......... e é para esta tabela que deverá fazer a importação.

3- Em cima desta tabela, faz uma consulta de acrescimo para a sua tabela final.

Paulo,

Minha ultima pergunta, existe alguma propriedade no access que ele grava o que mandar?

O responsavel falau alguma coisa sobre absolut position...

ou seja ele grava o que mandar!!!




Não desenvolvedor access mais sim vb6 .Net é na atual situação do mercado peguei o que veio..

temos que nos virar.

O AbsolutePosition é para posicionar-se do registo atual para um registro especifico e isso apenas funciona para Recordset.

Paulo, porque na consulta em access usando left não retorna todos os registros?
ou seja ele mostra a quantidade de registros e os que são iguais as duas..

eu preciso que mostre tudo..

obrigado.

Situalçao:

(278413 row(s) affected)

20,000 % 16/09/2015 09/11/2015 wwwwww 333333 2222
20,000 % 16/09/2015 09/11/2015 wwwwww 33333 2222


Obrigado