Extreme Veteran
Beiträge: 566
| Hallo,
Marzer - 03.11.19 18:44
In einem Bibliotheks-Programm (accde) hat es ca. 40 Tabellen; zwei davon sind eingebundene Excel-Dateien.
Sie erscheinen nicht, wenn ich alle Tabellen auflisten will mit folgendem Code:
.
Dim db as DAO.Database
Dim tdf As DAO.TableDef
Set db=CodeDb()
For Each tdf In db.TableDefs
....Debug.Print tdf.Name
Next tdf
.
Im Programm verwende ich in Funktionen CodeDB() - und nicht CurrentDb(), um Einträge in diesen Tabellen zu lesen.
Das funktioniert gut, solange das Programm 'standalone' läuft (accdb). Wenn ich es als Bibliotheks-AddIn verwende (accde) - d.h. diese Funktionen von einem anderen Programm her aufrufe, findet Access die beiden Tabellen nicht mehr ...
Wo läuft der Code denn? Im FE oder im Add-In?
Welche Zahl bekommst du mit db.TableDefs.Count? Sind die verknüpften Tabellen enthalten?
Hast du die Excel-Dateien evtl. erst zur Laufzeit eingebunden? Falls ja, hast du anschließend einen db.TableDefs.Refresh ausgeführt?
----- Gruss - Peter |