Von Excel auf Access
11.12.2003 14:26:42
Marko
Ich habe einen Makro der von Excel auf Access zugreift.
Bis jetzt kann ich nur einen bestimmten WErt in der Tabelle finden, un will ich wissen wie ich aus einer Tabelle die ID des letzten Datensatzes ermitteln kann?
Hier mein Code bis jetzt:
Set db = OpenDatabase("H:\myDB\testspmdb.mdb")
Set rs = db.OpenRecordset("tab_abteilung", dbOpenDynaset)
n = Range("D2").value
suche = "Abteilung = '" & n & "'"
rs.FindFirst suche
data = rs!abtID
File.write data & "|"
Set rs = Nothing
Set db = Nothing
MfG
Marko