Code Snippet "VBA Access"

Formulare mit voneinander abhängigen Kombinationsfeldern

Oft ist der Inhalt eines Kombinationsfeldes von anderen Kombinationsfeldern oder Formularinhalten abhängig, z.B. sollen nur noch Kategorien eines Projektes angezeigt werden. Dies ist möglich mit einer Kombination aus SQL und VBA.

'Das Beispiel bezieht sich auf das Feld [kategorie] im Formular frm_codeexamples

'Die Eigenschaft Datensatzherkunft enthält eine WHERE-Clause, die sich auf Formularfeld bezieht:
SELECT [qry_kategoriebylanguage].[kategorie] FROM qry_kategoriebylanguage WHERE ((([qry_kategoriebylanguage].[code_id])=Formulare!frm_codeexamples!code_id)) GROUP BY [qry_kategoriebylanguage].[kategorie]; 

'Nun muss das Feld noch aktualisiert werden, wenn es den Fokus erhält (Eigenschaft "Bei Fokuserhalt")
=funrequery([kategorie])

'Die Function funrequery findet sich in modcommonproc
Public Function funrequery(ByRef objctr)
  objctr.Requery
  funrequery = True
End Function

'Weitere Beispiele in Code-DB
'- Feld todonr in Formular frm_a_zeiten abhängig von Feld projektnr