mit AC 2003:
Ich möchte automatisch Tabellen von der DB 1 in die DB 2 importieren.
Es soll die DB 2 geöffnet werden und per Makro verschiedene Tabellen aus der DB 1 importiert werden. Beide DB stehen im gleichen Ordner…
Leider kann ich keine passende Einstellung in dem Befehl „TransferArbeitsblatt“ (oder anderen Befehl) finden - hier kann man nur aus Kalkulationstabellen was importieren.
mfg
Elmer
Hallo.
Leider kann ich keine passende Einstellung in dem Befehl
„TransferArbeitsblatt“ (oder anderen Befehl) finden - hier
kann man nur aus Kalkulationstabellen was importieren.
Wie wäre es mit TransferDatabase (in der VBA-Hilfe beschrieben)?
Gruß Eillicht zu Vensre
Wie wäre es mit TransferDatabase (in der VBA-Hilfe
beschrieben)?
Das habe ich versucht und im Makro alles reingeschrieben, leider bekomme ich die unverständliche Antwort von AC:
„Der von Ihnen eingegebene Objektname“ entspricht nicht den Regeln, nach denen Objekte in Microsoft Office Access benannt werden."
In der Hilfe dazu steht auch nicht wirklich was gescheites, jedenfalls klappt es nicht, automatisch Tabs von einer DB in eine andere DB zu verschieben (bei der Handarbeit über Datei… geht es problemlos - hier wäre eine Makrorkorder ganz hilfreich).
Der Export in VBA sieht so aus:
Function test_export()
On Error GoTo test_export_Err
DoCmd.TransferDatabase acExport, „Microsoft Access“, „\C:\XP_2003.mdb“, acTable, „Antragsjahr“, „“, False
test_export_Exit:
Exit Function
test_export_Err:
MsgBox Error$
Resume test_export_Exit
End Function
mfg Elmer
Hallo.
Function test_export()
On Error GoTo test_export_Err
DoCmd.TransferDatabase acExport, „Microsoft Access“,
„\C:\XP_2003.mdb“, acTable, „Antragsjahr“, „“, False
test_export_Exit:
Exit Function
test_export_Err:
MsgBox Error$
Resume test_export_Exit
End Function
Der Hase liegt an der unterstrichenen Stelle im Pfeffer : Du musst einen Tabellennamen zum Wegschreiben angeben.
Im Übrigen : Wieso benutzest Du eine Funktion, wenn Du nix zurückgibst?
Gruß Eillicht zu Vensre
Im Übrigen : Wieso benutzest Du eine Funktion, wenn Du nix
zurückgibst?
Ich habe einfach nur im Makro „speichern unter --> Modul“ eingestellt und dies ist das automatische Ergebnis…
mfg Elmer