Suche dringend einen VB - Code mit dem ich Daten von einer Tabelle in eine andere Tabelle (beides Access) kopieren oder ausschneiden kann!!!

DANKE

Hallo KerstinB,

hier ist ein VB-Code für Access mit dem Du Daten aus einer Tabelle in einer anderen eintragen kannst.

Dim Datenbank As Database

Dim Tabelle As Recordset

Set Datenbank = CurrentDb

Set Tabelle = Datenbank.OpenRecordset("andere Tabelle")

Tabelle.AddNew

Tabelle![Name] = TxtName

Tabelle![Vorname] = Vorname

Tabelle![strasse] = TxtStrasse

Tabelle![PLZ] = txtPLZ

Tabelle![Geburtsdatum] = geboren_am

Tabelle![Geburtsort] = Geburtsort

Tabelle![Telefon] = TxtTelefon

Tabelle![Handy] = TxtHandy

Tabelle.Update

Tabelle.Close

MfG

Frank

Hi,

Du kannst aber auch anstatt ein Recordset ein Command Objekt und SQL benutzen. Bei großen Datenmengen ist das dann Performanter:

Dim c as Command

Set c = New Command

c.ActiveConnection = <AktiveDBVerbindung>

c.CommandType = adCmdText

c.CommandText = "INSERT INTO Tabelle_1 (Feld_1,Feld_2) VALUES (Wert_1,Wert_2)"

c.Execute()

Wenn Du häufiger solche Funktionen benutzt, solltest du c als Public deklarieren, damit Du es immer wieder benutzen kannst!

Gruß Tiana.