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)