HelioFaria,

Bom dia!

Não sei o que está ocorrendo aí em seu micro. Não fiz absolutamente nada aqui. Abri seu arquivo e executei a macro normalmente, clicando na área destacada em Azul da aba Consolidado Diário. Executou perfeitamente sem qualquer erro. No final Exibiu a mensagem de sucesso que você difiniu sem nenhum problema.

Utilizo o Excel 2007.

Ai Meu Deus. Vai entender....Tentei rodar um outro Office 2013 e deu o mesmo problema. Testei em um 2010 e funcionou normalmente.

Sera que é algum problema com o .OpenDatabase? Será que o Excel 2013 não o reconhece?

Teria alguma outra forma de montar este codigo para funcionar em todas as versoes do Office²?

Creio que você terá que pesquisar um pouco mais, principalmente nos fóruns da Microsoft. Talvez até mesmo entrar em contato com o suporte da Microsoft.

Acredito que isso tenha a ver com as referências DAO ou ADO que se coloca no Excel para fazer a integração entre os dois aplicativo via VBA. Isso é incompatibilidade de DLL entre as versões. Tudo leva a crer. Pode até ser outra coisa mas... não sei.

Outra sugestão é você salvar o arquivo como uma versão mais antiga do Excel, tipo versão 97/2003 ou 2007 e verificar se funciona

Certo Wagner, e existe outro tipo de referência que eu possa usar para fazer a integração entre os dois aplicativos?

Pelo que andei vendo, muitas pessoas usam um tipo de conexão "ADODB.Connection", so que não sei se vale a pena tentar adaptar, pois os exemplos que baixei, tambem não rodaram direito.

De qualquer forma, muito obrigado pela orientação.

Eu utilizo sem nenhum problema. Uso o Excel 2007. Veja, anexo, um pequeno exemplo dessa utilização.

Wagner, obrigado pela força. Vou tentar entender o código desse arquivo que voce postou e ver se consigo adaptar para o meu.

Valeu irmão.

Wagner, tudo bem?

Modifiquei minha conexão para a string ADODB e funcionou.

Como tive muita dificuldade em reescrever o codigo, haja visto que so encontrei codigos bem mais avançados, estou postando o meu pronto. Tenho certeza que a galera vai começar a ter problemas ao utilizar conexão Access-Excel no Office 2013.

Valeu !!!!!