Sie hätten gerne alle Abfragen in Ihrer #Access #Datenbank im #Klartext? (Zum Beispiel, weil Sie herausfinden müssen, wo überall Sie ein bestimmtes Feld verwendet haben?). Die können Sie sich mit VBA auflisten lassen (oder in eine Tabelle schreiben, …), und zwar mit diesem Schnipsel:
Dim myQD As QueryDef
For Each myQD In CurrentDb.QueryDefs
If Left(myQD.Name, 1) <> "~" Then
Debug.Print
Debug.Print myQD.Name
Debug.Print myQD.SQL
End If
Next myQD
Set myQD = Nothing
katharinakanns
Soprani Software 