erro ao executar vba no excel executando um select filtrando campo data

Question

Bom dia, estou com um problema ao executar um vba no excel, dando um select em uma planilha, filtrando pelo campo data, se eu faço o select filtrando outro campo ou mesmo sem o filtro, o select roda sem nenhum problema, abaixo o codigo, e o erro que é apresentado quando chega na ultima linha

Dim conn    As ADODB.Connection
Dim rs      As ADODB.Recordset
Dim strCon  As String
Dim strSQL  As String
Dim i       As Integer
Dim DataInicial As Variant
Dim DataFinal   As Variant
Dim ValorTotal  As Currency

'Consultar dados no arquivo atual
strCon = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & ActiveWorkbook.Path & "\" & ActiveWorkbook.Name & ";Extended Properties='Excel 12.0 Xml;HDR=YES';"

'Definir a consulta SQL
strSQL = "SELECT [ID_EMPRESA], [NOME_EMPRESA], [DATA_EMISSAO] FROM [Dados$] WHERE [DATA_EMISSAO] BETWEEN #07/01/2023# AND #07/02/2024#"

'Abrir a conexão com o arquivo Excel
Set conn = New ADODB.Connection
conn.Open strCon

Answer 1

sou usuario do office 365 pago anualmente, mas não encontei como acionar o suporte .. fala de empresas... de administrador.. mas não tem nada falando de usuario final

Answer 2

Olá VALDEMIR J SANCHES,

Entendemos que você está enfrentando dificuldades para acessar sua conta de administrador. Quando um de nossos clientes encontra esse tipo de problema, a maneira mais rápida de resolvê-lo é entrando em contato com nosso atendimento ao cliente por telefone.

Em anexo, você encontrará nossos contatos.

Brasil (Brasil)

Answer 3

Oi VALDEMIR J SANCHES,

O objetivo desta mensagem é verificar as informações fornecidas. Se tiver mais atualizações sobre este assunto, por favor, não hesite em responder neste mesmo tópico.

Cuidadosamente

Jonathan

-----------

Se a resposta for a solução correta, clique em "Aceitar resposta" e vote educadamente nela. Se você tiver perguntas adicionais sobre essa resposta, clique em "Comentar". Nota: Siga as etapas em nossa documentação para habilitar notificações por e-mail se você gostaria de receber notificações por e-mail relacionadas a este tópico.

Answer 4

Consegui ajuda de um outro usuario, e o problema era que o arquivo xlsm estava em uma pasta que era sincronizada pelo one-drive, coloquei em uma pasta comum e o código funcionou, uma pena que aparentemente é um bug, pois em nenhum momento coloquei o caminho fixo para o arquivo na string de conexão, então teoricamente o excel, deveria "se virar" com este detalhe, afinal o one-drive é um recurso do proprio excel

Answer 5

Agradeço pela informação fornecida e pela maneira como solucionou seu caso, o que é extremamente importante para compreender seu código e erro.

Espero ter a oportunidade de ajudar novamente no futuro, com quaisquer outras dúvidas que possam aparecer.

Atenciosamente,

Jonathan