Olá pessoal,
Necessito aprender como se criar consulta temporária via vba,
Consigo fazer a consulta buscando os campos em uma tabela existente, e ordenar campo desejado, mais não consigo criar um filtro utilizando uma caixa de combinação do meu formulário, veja o código abaixo.
Private Sub Btn_FiltroNome2_Click()
CurrentDb.QueryDefs.Delete ("Cst_Temp")
Set qdf = DBEngine(0)(0).CreateQueryDef("Cst_Temp", "SELECT [Tbl_Produto].TagNOME1,[Tbl_Produto].TagNOME2,[Tbl_Produto].TagNOME3,[Tbl_Produto].TagNOME4,[Tbl_Produto].TagNOME5,[Tbl_Produto].TagNOME6 FROM Tbl_Produto order by Tbl_Produto.TagNOME2")
End Sub
Gostaria de saber como criar um código para a consulta temporária para filtrar um determinado campo da tabela, selecionado na combobox do formulário.
Exemplo: quero filtrar o campo TagNOME1 como os regitros escolhido pela minha caixa de combinação (combobox)
Legenda:
Tbl_Produto = Nome da tabela
TagNOME1/2/3/4/5/6 = Nomes dos campos na Tbl_Produto
Cst_Temp = Nome da consulta temporária
Necessito aprender como se criar consulta temporária via vba,
Consigo fazer a consulta buscando os campos em uma tabela existente, e ordenar campo desejado, mais não consigo criar um filtro utilizando uma caixa de combinação do meu formulário, veja o código abaixo.
Private Sub Btn_FiltroNome2_Click()
CurrentDb.QueryDefs.Delete ("Cst_Temp")
Set qdf = DBEngine(0)(0).CreateQueryDef("Cst_Temp", "SELECT [Tbl_Produto].TagNOME1,[Tbl_Produto].TagNOME2,[Tbl_Produto].TagNOME3,[Tbl_Produto].TagNOME4,[Tbl_Produto].TagNOME5,[Tbl_Produto].TagNOME6 FROM Tbl_Produto order by Tbl_Produto.TagNOME2")
End Sub
Gostaria de saber como criar um código para a consulta temporária para filtrar um determinado campo da tabela, selecionado na combobox do formulário.
Exemplo: quero filtrar o campo TagNOME1 como os regitros escolhido pela minha caixa de combinação (combobox)
Legenda:
Tbl_Produto = Nome da tabela
TagNOME1/2/3/4/5/6 = Nomes dos campos na Tbl_Produto
Cst_Temp = Nome da consulta temporária