Access-o-Mania

Access-Forum (Deutsch/German) => Access Programmierung => Thema gestartet von: bhommi am Juli 08, 2019, 12:42:03

Titel: Auslesen von Bezeichnungen der vorhandenen Tabellenblätter
Beitrag von: bhommi am Juli 08, 2019, 12:42:03
Hallo zusammen,

ich suche nach einer Möglichkeit die Bezeichnungen der vorhandenen Tabellenblätter in einer Excel-Datei über Access per VBA abzufragen.

Ist das möglich?

Vielen Dank im Voraus.

Gruß
Björn
Titel: Re: Auslesen von Bezeichnungen der vorhandenen Tabellenblätter
Beitrag von: markusxy am Juli 08, 2019, 12:58:37
Du kannst via Objektmodell zugreifen
siehe: http://www.access-im-unternehmen.de/807

Oder über die verborgene Systemtabelle MSysRelationships.
Titel: Re: Auslesen von Bezeichnungen der vorhandenen Tabellenblätter
Beitrag von: bhommi am Juli 08, 2019, 13:29:57
Hallo Markus,

innerhalb Access kenne ich die Lösung, aber ich versuche ja die Namen der Register in einer Excel-Datei auszulesen.
Vielleicht habe ich mich etwas missverständlich ausgedrückt oder habe deine Antwort noch nicht verstanden ;-))

Gruß
Björn
Titel: Re: Auslesen von Bezeichnungen der vorhandenen Tabellenblätter
Beitrag von: ebs17 am Juli 08, 2019, 13:37:11
Zitatdie Bezeichnungen der vorhandenen Tabellenblätter in einer Excel-Datei
Das erfolgt genau so wie man es unmittelbar in Excel ausführen würde, nur dass man man von außerhalb zusätzlich auch auf die Arbeitsmappe referenzieren muss:
Dim objSheet As Object
' Referenz objWorkbook ist vorher festzulegen
For Each objSheet in objWorkbook.Sheets
   Debug.Print objSheet.Name
Next
Titel: Re: Auslesen von Bezeichnungen der vorhandenen Tabellenblätter
Beitrag von: bhommi am Juli 08, 2019, 13:55:25
Supi, danke für den Hinweis damit komme ich klar ;-)
Titel: Re: Auslesen von Bezeichnungen der vorhandenen Tabellenblätter
Beitrag von: markusxy am Juli 08, 2019, 21:00:30
Zitat von: bhommi am Juli 08, 2019, 13:29:57
Hallo Markus,

innerhalb Access kenne ich die Lösung, aber ich versuche ja die Namen der Register in einer Excel-Datei auszulesen.
Vielleicht habe ich mich etwas missverständlich ausgedrückt oder habe deine Antwort noch nicht verstanden ;-))

Gruß
Björn

Hallo Björn, dass war die richtige Antwort, aber nicht auf deine Frage.  ;D ;D