Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1564to1568
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Spaltenbezeichnungen auslesen VBA ACCESS

Spaltenbezeichnungen auslesen VBA ACCESS
26.06.2017 13:03:18
vbaTrainee85
Hallo
ich würde gerne die Spaltenbezeichnungen aus einer TAbelle mittels DAO auslesen
wie funktioniert dass?
MFG

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Spaltenbezeichnungen auslesen VBA ACCESS
26.06.2017 15:13:20
Luschi
Hallo vbaTrainee85,
das funktioniert so:
Dim dbe As Object, db As Object, rs As Object
Dim strDB As String, i As Integer
strDB = "D:\Daten\Access\xxx...\meineDB.accdb"
'Set dbe = CreateObject ("DAO.DBEngine.36") 'Access 2000-2003
'Initialisieren
'DAO-Engine
Set dbe = CreateObject("DAO.DBEngine.120") 'ab Access 2007
'Datenbank öffnen
Set db = dbe.Workspaces(0).OpenDatabase(strDB)
'Tabelle als Recordset öffnen
Set rs = db.OpenRecordset("Artikel", dbOpenSnapshot, dbReadOnly)
For i = 0 To rs.Fields.Count - 1
Debug.Print rs.Fields(i).Name
Next i
Gruß von Luschi
aus klein-Paris
Anzeige

306 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige