Access-o-Mania

Access-Forum (Deutsch/German) => Tabelle/Abfrage => Thema gestartet von: KaJo am Juli 27, 2024, 19:54:44

Titel: Bemerkungen von Feldern per VBA auslesen
Beitrag von: KaJo am Juli 27, 2024, 19:54:44
Hallo,
ich möchte alle Tabellen und in den Tabellen die Tabellenfelder mit ihren Eigenschaften auslesen,
damit ich beim Erstellen von Abfragen per VBA nicht immer auf Fehler komme, weil die Feldbezeichnung
falsch ist oder weil das von mir händisch eingetragene Feld nicht den richtigen Typ hat.
Das Auslesen und Eintragen Tabellen und Felder in meine Tabellen klappt nach Hinweisen aus Büchern und
Foren. Ich kann von den Feldern den Namen (Feld.Name), die Größe (Feld.Size), den Typ (Feld.Type).
Es gelingt mir aber nicht, die Bemerkung auszulesen. Feld.Properties("Description") führt bei mir zu einem Fehler.
Wie kann ich die Bemerkung eines Feldes per VBA bestimmen?

Vielen Dank im Voraus für die Hinwweise.   
Titel: Re: Bemerkungen von Feldern per VBA auslesen
Beitrag von: PhilS am Juli 28, 2024, 12:06:13
Zitat von: KaJo am Juli 27, 2024, 19:54:44Es gelingt mir aber nicht, die Bemerkung auszulesen. Feld.Properties("Description") führt bei mir zu einem Fehler.
Feld.Properties("Description") ist genau richtig.
...aber, diese Eigenschaft gibt es nur wenn für eine Spalte auch wirklich eine Beschreibung eingetragen wurde. Andernfalls führt es zu einem Error 3270 "Property not found".
Du musst also diesen Fehler behandeln, damit dein Code nicht abbricht, wenn eine Spalte keine Beschreibung hat.
Titel: Re: Bemerkungen von Feldern per VBA auslesen
Beitrag von: KaJo am Juli 29, 2024, 14:46:37
Hallo PhilS,
vielen Dank für den Hinweis.

Für alle, die diese Anfrage verfolgen:
Die Prüfungen isnull(...) oder   exists(...)   oder nothing(...)  haben zu keinem Ergebnis geführt, weil
die Eigenschaft 'Description' bei einem Feld nur dann existiert, wenn man bei 'Bemerkung' in der Tabellendefinition etwas eingeschrieben hat.
Mit On error resume next
    ,,,
    On error Goto 0
konnte ich den Fehler 'umschiffen'.

Nochmals vielen Dank für die Hilfe.