Neste tutorial, você aprenderá como abrir e executar consultas no VBA.
Criamos uma tabela chamada ProductsT e uma consulta de seleção simples que seleciona a categoria de produto onde o nome do produto é Product BBB, da tabela.
Abrindo uma consulta com VBA
Você pode usar o método DoCmD.OpenQuery para abrir / visualizar uma consulta que você criou. O código a seguir abrirá a consulta chamada QueryOne:
DoCmd.OpenQuery "QueryOne"
O resultado é:
A sintaxe do método DoCmd.OpenQuery é:
DoCmd.OpenQuery (QueryName, Visualizar, DataMode) Onde:
| Parâmetro | Descrição |
|---|---|
| QueryName | O nome de uma consulta existente no banco de dados que você deseja abrir / visualizar. |
| Visualizar | A visualização na qual você deseja abrir a consulta. Pode ser acViewDesign, acViewLayout, acViewNormal, acViewPivotChart, acViewPivotTable, acViewPreview ou acViewReport. O padrão é acViewNormal. (Opcional) |
| DataMode | O modo de entrada de dados no qual você gostaria de abrir sua consulta. Pode ser acAdd, acEdit ou acReadOnly. O padrão é acEdit. (Opcional) |
Execução de consultas de ação com VBA
Você pode usar o método DoCmd.RunSQL para executar consultas de ação, como consultas de atualização, anexar consultas, excluir consultas e fazer consultas de tabela. O código a seguir anexa um registro à tabela:
DoCmd.RunSQL "Inserir INTO ProductsT ([ProductID], [ProductName], [ProductCategory], [ProductPricePerUnit]) VALUES (6, 'Product FFF', 'Toys', 10);"
A sintaxe do método DoCmd.RunSQL é:
DoCmd.RunSQL SQLStatement onde:
SQLStatement - obrigatório e é uma instrução SQL que atualiza registros, acrescenta registros, exclui registros ou cria uma nova tabela.
Observação: DoCmd.RunSQL funciona apenas com certas instruções SQL.
