V tomto kurzu se naučíte, jak otevírat a spouštět dotazy ve VBA.
Vytvořili jsme tabulku s názvem ProductsT a jednoduchý výběrový dotaz, který z tabulky vybere kategorii produktu, kde je název produktu Produkt BBB.
Otevření dotazu pomocí VBA
Metodu DoCmD.OpenQuery můžete použít k otevření/zobrazení dotazu, který jste vytvořili. Následující kód otevře dotaz s názvem QueryOne:
DoCmd.OpenQuery "QueryOne"
Výsledek je:
Syntaxe metody DoCmd.OpenQuery je:
DoCmd.OpenQuery (QueryName, Pohled, Režim dat) kde:
Parametr | Popis |
---|---|
QueryName | Název existujícího dotazu v databázi, který chcete otevřít/zobrazit. |
Pohled | Pohled, ve kterém chcete dotaz otevřít. Může to být acViewDesign, acViewLayout, acViewNormal, acViewPivotChart, acViewPivotTable, acViewPreview nebo acViewReport. Výchozí hodnota je acViewNormal. (Volitelný) |
Režim dat | Režim zadávání dat, ve kterém chcete otevřít dotaz. Může to být acAdd, acEdit nebo acReadOnly. Výchozí hodnota je acEdit. (Volitelný) |
Spouštění akčních dotazů pomocí VBA
Metodu DoCmd.RunSQL můžete použít ke spouštění akčních dotazů, jako jsou aktualizační dotazy, připojovací dotazy, mazací dotazy a vytváření tabulkových dotazů. Následující kód připojí záznam do tabulky:
DoCmd.RunSQL "Vložte hodnoty INTO ProductsT ([ProductID], [ProductName], [ProductCategory], [ProductPricePerUnit]) HODNOTY (6, 'Product FFF', 'Toys', 10);"
Syntaxe metody DoCmd.RunSQL je:
DoCmd.RunSQL SQLStatement kde:
SQLStatement - povinný a je příkazem SQL, který buď aktualizuje záznamy, připojuje záznamy, odstraňuje záznamy nebo vytváří novou tabulku.
Poznámka: DoCmd.RunSQL funguje pouze s určitými příkazy SQL.