Hallo,
ich würde gern iterativ in einer Prozedur Variablen mit Funktionswerten belegen, wobei die Variablen- und Funktionsnamen in einer Tabelle gespeichert sind.
Die Tabellendefinition:
tabelle
fktName: Text
varName: Text
Der Tabelleinhalt von tabelle
varName fktName
gelesenesIrgendwas1 leseIrgendwas1()
gelesenesIrgendwas2 leseIrgendwas2()
gelesenesIrgendwas3 leseIrgendwas3()
Eine Prozedur
Sub Test()
Dim gelesenesIrgendwas1 As String
Dim gelesenesIrgendwas1 AS Integer
Dim gelesenesIrgendwas1 AS Byte
With CurrentDB.OpenRecordset("tabelle", dbOpenSnapshot)
Do While Not .eof
.Fields("varName") = .Fields("fktName")
Loop
End With
End Sub
Könnte mir jemand den Schleifeninhalt der Prozedur Test() so korriegieren, damit es funktioniert?
Vielen Dank,
Gruß Jan