PDA

Vollständige Version anzeigen : VBA-Abfrage, ob bestimmtes Feld in Tabelle vorhanden


Harald Ukena
27.04.2001, 06:53
Hallo,
weiß jemand mal schnell, wie ich per VBA abfragen kann, ob in meiner Tabelle ein bestimmes Feld (nicht Feldinhalt!) existiert?

Vielen Dank

Gruß Harald

Alexander Jan Peters
27.04.2001, 07:42
Hallo,

so sollte es eigentlich gehen:

Public Function fTableField(ByVal strTable As String, strField As String) As Boolean
Dim db As Database
Dim intA As Integer
Dim fField As Boolean

fField = False

Set db = DBEngine(0)(0)

For intA = 0 To db.TableDefs
(strTable).Fields.Count - 1
If (intA).Name = strField Then
fField = True
End If
Next

fTableField = fField
End Function

MfG

A.J. Peters

Harald Ukena
27.04.2001, 14:27
Danke!