jonnycash
Goto Top

Datensatz aus tbl1 Kopieren und in tbl2einfügen!

Hallo Access User
Habe ein kleines Problem!
Ich habe die tablle1 und tabelle2
Des Weiteren habe ich ein Endlosformular was auf die Daten von tablle1 zurückgreift!

Ich möchte jetzt einen Button im Endlosformular haben der folgendes machen soll!

Schneide den aktuellen Datensatz aus der tabelle1 aus und füge Ihn in der tabelle2 hinzu!
(tbl1 und tbl2 haben die selbe strukur)

Wie kann man sowas in VBA umsetzen??

Vielen Dank für eure Hilfe!

Content-Key: 133628

Url: https://administrator.de/contentid/133628

Printed on: April 26, 2024 at 23:04 o'clock

Member: n4426
n4426 Jan 16, 2010 at 20:34:04 (UTC)
Goto Top
Hi Jonny,

Verschieben geht soweit ich weiß gar nicht. Du kannst nur den Datensatz mit den gleichen Daten in TBL2 erstelle und dann in TBL1 löschen.

Das erstellen eines neuen Datensatz mittels VBA in einer anderen Tabelle würde z. B. so gehen.

Dim db As Database
Dim rs As DAO.Recordset
        
Set db = CurrentDb()
        
        
Set rs = db.OpenRecordset("SELECT TBL2.* FROM TBL2;", dbOpenDynaset)  
             
rs.AddNew
    
    rs!Feld1 = Me.Feld1
    rs!Feld2 = Me.Feld2
    rs!Feld3 = Me.Feld3


    rs.Update
rs.Close
        
db.Close

Danach musst du nur noch den vorhanden Datensatz in TBL1 löschen lassen.

mfg
andi
Member: JonnyCash
JonnyCash Jan 17, 2010 at 13:45:32 (UTC)
Goto Top
Hallo Andi

Vielen Dank für die Antwort!
Klappt Super deine Lösung!

Wochenende ist gerettet!face-wink

Gruß
Member: n4426
n4426 Jan 17, 2010 at 14:52:43 (UTC)
Goto Top
Dann ist gut, und jetzt noch den Beitrag als gelöst makieren.

mfg
andi