Tabelle anhängen als Macro

[Ben.Wisch]

 

Hallo zusammen,

ich habe mal eine Frage. Ich weiss ich habe in meiner Datenbank diverse Tabellen, die ich aus verschiedenen Übertragungen in eine "Mutter"-Tabelle übertrage (Tabelle kopieren - an vorhandene Tabelle anfügen / Tabelle löschen).
Nun meine Frage, besteht die Möglichkeit diesen Vorgang in ein Marco, oder in VBA zu programmieren um das alles mit einem Mausklick abzufrühstücken?
Schönen Dank schon mal für eure Hilfe

...bis dahin

Ben.Wisch

[T417]

Klar. Du kannst das am besten mit SQL-Abfragen machen.
Kannst auch diese übers VBA programmieren.
Einfach im

Code [Auswählen] Erweitern


Button_Click()
CurrentDb.Execute ("INSERT INTO Tabelle1(Hier_kommen_deine_Spalten_rein) " & "SELECT * FROM Tabelle2")'In Tabelle1 kompletten Inhalt von Tabelle2 einfügen
CurrentDb.Execute("DELETE * FROM Tabelle2")'Kompletten Inhalt von Tabelle2 löschen
End sub


Grüße
T.

[database]

Hallo Ben,

Wenn die neue Tabelle noch nicht besteht dann:

Code [Auswählen] Erweitern

CurrentDb.Execute ("SELECT * INTO NeueTabelle FROM AlteTabelle")

Wenn die Tabelle bereits besteht und die Spaltenanzahl sowie deren Namen ident sind

Code [Auswählen] Erweitern

CurrentDb.Execute ("INSERT INTO NeueTabelle SELECT * FROM AlteTabelle")

Mit beiden SQL-Statements werden die Daten aus allen Spalten in die neue Tabelle transferiert.

Tabelle kopieren - an vorhandene Tabelle anfügen / Tabelle löschen

Löschen der alten Tabelle wenn diese nicht mehr gebraucht wird mit (VORSICHT - da wird nicht nachgefragt!)

Code [Auswählen] Erweitern

CurrentDb.TableDefs.Delete ("AlteTabelle")

HTH

Peter