Forum des Access-Tutorials

Relationenen setzten in Access mittels VBA (Access)

Martin Asal , Dienstag, 03.12.2019, 14:00 (vor 177 Tagen) @ SteffiB777

Hallo Steffi,

ich verstehe nicht, was du eigentlich bezwecken willst? Du löschst eine Beziehung - nur um genau diese Beziehung im nächsten Moment wieder zu erstellen?

Set tdfY = db.TableDefs("yprst")
Set tdfA = db.TableDefs("Anfertigungsteil")

Diese Zeilen finden sich sinnfreier Weise doppelt in deinem Code.

dbY.Relations.Refresh

Möglicherweise verursacht das deinen Fehler? "dbY" gibt es nicht. Wenn das den Fehler verursacht, solltest du mit Option Explicit arbeiten.

Martin