PDA

Vollständige Version anzeigen : Über VBA einzelne auf einzelne TABELLENFELDER zugreifen!


rawa
02.08.2001, 11:03
Brauche wieder ein wenig Hilfe. (Danke an Arno)

Wie greife ich auf eine Tabelle in VBA zu? Etwa so: "[Tab.Tabelle_Bsp.Feld_Bsp]" ? Oder doch "Tabs."? Wie bei "Forms."?

Es geht darum, dass dieses Feld als Pfadangabe funktioniert... optional. Mir fällt nur nicht ein, wie man auf Tabellen in VBA zugreift.

Dann könnt ihr mir gleich alle anderen geben, die von Formularen, Berichten usw. ...

Danke im voraus.

Kurt aus Kienitz
02.08.2001, 11:12
Hallo,

Auf einzelne Werte greif man mit der Funktion DLookup().

Dim vVar As Variant

vVar = DLookup("[Feld_Bsp]","Tabelle_Bsp","")


Um auf mehrer Spalten bzw. mehrer Zeilen zuzugreifen sollte man ein Recordset benutzen. Dazu gibt es gute Beispiele in der Access-Hilfe.

Thomas Ruf
02.08.2001, 13:41
'Beispiel für Zugriff auf einzelne Datenfelder

Dim nr As Long
Dim db As Database
Dim rs As Recordset
Dim rs1 As Recordset

Set db = CurrentDb
Set rs = db.OpenRecordset("Artikel", dbOpenDynaset)

nr = 7


'Filter
rs.Filter = "[Artikel_NR] = " & nr
Set rs1 = rs.OpenRecordset


MsgBox rs1![Lager_NR]


'gefilterten Datensatz editieren
rs1.Edit
rs1![Lager_NR] = 7000
rs1.Update

'gefilterten Datensatz löschen
rs1.Delete


rs.Close
rs1.Close

So greife ich auf Tabellenfelder zu
vielleicht hilft es Dir

Grüße