V tomto návode sa naučíte, ako otvárať a spúšťať dotazy vo VBA.
Vytvorili sme tabuľku s názvom ProductsT a jednoduchý výberový dotaz, ktorý z tabuľky vyberie kategóriu produktu, kde je názov produktu Produkt BBB.
Otvorenie dotazu pomocou VBA
Metódu DoCmD.OpenQuery môžete použiť na otvorenie/zobrazenie dotazu, ktorý ste vytvorili. Nasledujúci kód otvorí dotaz s názvom QueryOne:
DoCmd.OpenQuery "QueryOne"
Výsledkom je:
Syntax metódy DoCmd.OpenQuery je:
DoCmd.OpenQuery (QueryName, vyhliadka, DataMode) kde:
Parameter | Popis |
---|---|
QueryName | Názov existujúceho dotazu v databáze, ktorý chcete otvoriť/zobraziť. |
vyhliadka | Pohľad, v ktorom by ste chceli otvoriť dotaz. Môžu to byť acViewDesign, acViewLayout, acViewNormal, acViewPivotChart, acViewPivotTable, acViewPreview alebo acViewReport. Predvolená hodnota je acViewNormal. (Voliteľné) |
DataMode | Režim zadávania údajov, v ktorom by ste chceli otvoriť svoj dotaz. Môže to byť acAdd, acEdit alebo acReadOnly. Predvolená hodnota je acEdit. (Voliteľné) |
Spustenie akčných dotazov pomocou VBA
Metódu DoCmd.RunSQL môžete použiť na spustenie akčných dotazov, ako sú napríklad aktualizačné dotazy, pripájacie dotazy, mazacie dotazy a vytváranie tabuľkových dotazov. Nasledujúci kód pripája záznam k tabuľke:
DoCmd.RunSQL "VLOŽTE DO HODNOTY ProductsT ([ProductID], [ProductName], [ProductCategory], [ProductPricePerUnit]) (6, 'Product FFF', 'Toys', 10);"
Syntax metódy DoCmd.RunSQL je:
DoCmd.RunSQL SQLStatement, kde:
SQLStatement - vyžaduje sa a je to príkaz SQL, ktorý buď aktualizuje záznamy, pridáva záznamy, odstraňuje záznamy alebo vytvára novú tabuľku.
Poznámka: DoCmd.RunSQL funguje iba s určitými príkazmi SQL.