bollywood actresses hair loss hair rehab london contact number cheap hair extensions brazilian curly hair with closure hair extension fails human hair wigs black ponytail hairstyles 2018 sunny hair extensions uk hair extensions remy hair extensions weft koko one piece hair extensions clip hair
Consulta SQL dentro do código VBA

... Assinatura do site por 1 ano + Kit MontaRibbons + 3 Livros em PDF + Diversas Revistas (pdf) de brinde, por apenas R$100,00
(
podendo parcelar em até 10 vezes no cartão de crédito)...

Clique aqui e obtenha mais detalhes do nosso kit completo e de como comprar.


Consulta SQL dentro do código VBA

Antes de iniciar a sua leitura, clique aqui e cadastre-se para receber comunicados sobre novos artigos.

Usuário Rodrigo:

Bom dia!

Preciso de algo simples, mas que está muito difícil para eu fazer.

Já passei horas procurando e testando um monte de códigos, e nada.

Criei no meu formulário um botão denominado BtnSQL para chamar a consulta abaixo. Como fica o código VBA para isso?

("SELECT Nome, Cdc FROM TabClientes")

Grato!

Suporte:

Rodrigo, crie a consulta no modo gráfico. Depois é só chamar pelo VBA, através do comando DoCmd. Exemplo:

DoCmd.OpenQuery "NomeDaConsulta"

Você também pode criar a consulta, via VBA, e então abrir pelo comando DoCmd.  Veja o procedimento oferecido:

Public Sub btnSql_Click()
Dim qdf As DAO.QueryDef
Dim mySql As String
On Error Resume Next
'Deleta a consulta criada no modo gráfico
DoCmd.DeleteObject acQuery, "qryTemp"
mySql = "SELECT Nome, Cdc FROM TabClientes;"
'Cria a consulta no modo gráfico
Set qdf = CurrentDb.CreateQueryDef("qryTemp", mySql)
Set qdf = Nothing
'Abre a consulta criada
DoCmd.OpenQuery "qrytemp"
End Sub

Usuário Rogerio:

Obrigado, Mestre Avelino, pela dica de criar consulta totalmente via VBA.

Abraço.


 

 


2 comentário(s)

arilson   19/03/2018 06:51:50

'Deleta a consulta criada no modo gráfico
DoCmd.DeleteObject acQuery, "qryTemp"

Boa tarde Mestre Avelino. 1º - Fiquei sem entender O que é uma Consulta Gráfica.

2ª - Será que este Código (DoCmd.DeleteObject acQuery, "qryTemp") cria uma tabela Temporária??

arilson   19/03/2018 06:51:51

'Deleta a consulta criada no modo gráfico
DoCmd.DeleteObject acQuery, "qryTemp"

Boa tarde Mestre Avelino. 1º - Fiquei sem entender O que é uma Consulta Gráfica.

2ª - Será que este Código (DoCmd.DeleteObject acQuery, "qryTemp") cria uma tabela Temporária??


Envie seu comentário: