locked
Consulta SQL não é realizada no VBA, mas roda no Access RRS feed

  • Pergunta

  • Pessoal,

    tenho um problema.

    Fiz uma consulta de seleção no Access 2007 e desejo colocá-la no meu código VBA do Excel para gerar uns relatórios.

    A questão é que no Access a consulta me mostra o resultado necessário, qnd coloco a consulta no VBA, ela não me devolve nenhum dado nem erro!

    A conexão de dados está correta pois já utilizo uma outra consulta com ela.

    Alguém saberia me explicar o por que de não estar funcionando??

    Com este código comentado consegui recuperar somente a informação DT_ATUALIZACAO.

    ''CONSULTA ATA #2
    
    
    'Conexão BD...
    
    sql = "SELECT TB_ATA.ATA , Max(TB_HISTORICO_ATA.DT_ATUALIZACAO) AS MáxDeDT_ATUALIZACAO" & Chr(10)
    'sql = sql & "Last(HISTORICO_ATA.ATA_ORCAMENTO), Last(HISTORICO_ATA.ATA_APROV_C)," & Chr(10)
    'sql = sql & "Last(HISTORICO_ATA.ATA_APROV_P) " & Chr(10)
    sql = sql & "FROM TB_ATA INNER JOIN TB_HISTORICO_ATA ON TB_ATA.ATA_ID = TB_HISTORICO_ATA.ATA_ID " ' INNER JOIN TB_HISTORICO_ATA ON TB_ATA.ATA_ID = TB_HISTORICO_ATA.ATA_ID " & Chr(10)
    sql = sql & "GROUP BY TB_ATA.ATA " & Chr(10)
    'sql = sql & "HAVING (((TB_ATA.ATA) Like '*'));"
    
    

    Esta consulta completa acima roda muito bem no Access, entretanto dentro do VBA só funciona com essas linhas comentadas..

    Alguma ideia??

     

    Desde já obrigado.


    André Leopoldino
    quinta-feira, 3 de março de 2011 16:29

Todas as Respostas

  • Olá,

     

    experimente trocar chr(10) por espaços.


    Luiz Cláudio Cosenza Vieira da Rocha - http://msmvps.com/blogs/officedev - IT Lab www.itlab.com.br - Access FAQ: www.accessfaq.com.br
    • Sugerido como Resposta Priscila Sheila sexta-feira, 25 de março de 2011 13:21
    domingo, 6 de março de 2011 04:01
    Moderador