Zugriff verwenden, um auf Objekte innerhalb des Zugriffs zu verweisen

Question

Ich habe eine Basistabelle im Zugriff mit mehreren ausgefüllten Feldern. Ich möchte untersuchen, ob es einen Weg gibt, vorzugsweise über die GUI (oder vielleicht über SQL), ein Feld hinzuzufügen, das den Namen der Tabelle selbst enthält. Ich sehe nur die folgenden Datenformate für Felder: Kurzer Text, Langer Text, Anzahl, Datum/Uhrzeit, Währung, Autonummer, Ja/Nein, OLE-Objekt, Hyperlink, Anhang und Berechnet. Zu den Datenobjektparametern selbst, wie Tabellen-, Feld- oder Query-Namen oder -Parametern gibt es nichts ...

Answer 1

Sie können die Metadaten der Datenbank über VBA-Makros (Visual Basic für Applikationen) aufrufen.

Zum Beispiel kann dies alle Tabellennamen anzeigen:

Option Compare Database 

Public Sub Test() 
    Dim database As DAO.database 
    Dim tableDef As DAO.tableDef 
    Set database = CurrentDb 
    For Each tableDef In database.TableDefs 
      MsgBox tableDef.Name 
    Next 
End Sub