Definere hvilken tabel der skal lægges data i

Hej

I min database skal man, når man åbner en bestemt menu, have mulighed for at taste ned i nogle forskellige tabeller.

F.eks. Formular1 indeholder 10 felter. Det første felt er et listefelt, hvor du kan vælge mellem 4 tabeller. De 9 andre felter er beregnet til indtastning, efter tabellen er valgt. Alle 4 tabeller har de samme kolonner.

Jeg har forsøgt mig med følgende kode, men uden held:

Private Sub txtHvilkenTabel_AfterUpdate()
Dim Mindb As Database
Dim Mintabel As Recordset
Dim HvilkenTabel As String

HvilkenTabel = txtHvilkenTabel.Value

Set Mindb = CurrentDb
Set Mintabel = Mindb.OpenRecordset(HvilkenTabel, DB_OPEN_TABLE)
End Sub

Det eneste jeg får ud af dette er en type mismatch.

Jeg mangler stadig at sætte felterne sammen med den nye tabel, men det burde være løst ved at skrive destinationsfeltet i hvert felts kontrolelementkilde (da feltnavnene er ens for samtlige tabeller) ikke?

Håber i kan hjælpe mig, og bare sig til hvis i skal bruge mere inormation.

På forhånd tak
Jimmi