Office: Auslesen der Spaltennamen aus tabelle

Caro-Toby · 20. Juli 2003

Hallo!
angenommen ich hätte eine Tabelle und wüsste di Spaltennamen nicht!

-wie kann ich den ersten Spalltennamen ermitteln wenn ich nur den Tabellennamen habe??
-wie kann ich alle Spaltennamen ermitteln??

eine der Beiden antworten würde mir schon reichen *biggrin.gif*

Gruss
toby

win2kpro acc2kpro

gruss
toby

:)

MRR · 22. Juli 2003

Z.B. so:
Code:

Dim i As Integer
Dim rs As DAO.Recordset
Set rs = CurrentDb.OpenRecordset("EineTabelle", dbOpenSnapshot)
For i = 0 To rs.Fields.Count - 1
MsgBox "Das " & i + 1 & ". Feld heisst " & rs.Fields(i).Name
Next

'oder - wenn nur das erste Feld gewünscht ist
MsgBox "Das 1. Feld heisst " & rs.Fields(0).Name
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

HTH

Rainer Simon · 22. Juli 2003

Hallo Toby,

verwende die Fields-Auflistung. Zum Beispiel so:
Code:

Private Sub test()
Dim recA As DAO.Recordset
Dim strSQL As String

strSQL = "Select * from Tabelle1;"
Set recA = CurrentDb.OpenRecordset(strSQL)
MsgBox recA.Fields(0).Name
Set recA = Nothing
End Sub
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

Du mußt bloß Tabelle1 gegen den Namen Deiner Tabelle wechseln und die Null im Klammerpaar anpassen.

Gruß Rainer

Caro-Toby · 22. Juli 2003

habe mich für Matthias lösung entschieden!!

gruss
toby

Office: Auslesen der Spaltennamen aus tabelle

Auslesen der Spaltennamen aus tabelle

Auslesen der Spaltennamen aus tabelle

Auslesen der Spaltennamen aus tabelle

Auslesen der Spaltennamen aus tabelle - Similar Threads - Auslesen Spaltennamen tabelle

Teile aus einem qrcode string auslesen

VBA Auslesen von Strings und erstellen neuer Zeilen in einer Tabelle

aktuelles Alter aus Geburtsdatum auslesen und runde Geburtstage markieren

Datum einer Datei per VBA auslesen

Werte auslesen mit s(w)verweis

textdatei auslesen

Spaltenname auslesen