ACCESS 97: DOCMD zu anderen Datenbanken

Computer: Software & Programmierung Datenbanken allgemein
#1

hallo kollegas,

wer kann mir helfen (*schluchz*).
Ich möchte von einer aktuellen ACCESS97-Datenbank aus eine
Excel-Tabelle per VBA in eine andere Datenbank importieren.
Würde ich den Importvorgang für die aktuelle Datenbank
programmieren, würde ich dies mit dem DoCmd.TransferSpreadsheet-Befehl
machen. Für eine andere Datenbank funktioniert das nicht, oder ??
Gibt´s vielleicht eine Möglichkeit docmd-Befehle auf eine andere
Datenbank anzuwenden.

Schon im voraus herzlichen Dank für eure Hilfe

Gruß

Tommi

#2

Gibt´s vielleicht eine Möglichkeit docmd-Befehle auf eine
andere
Datenbank anzuwenden.

Das habe ich noch nie versucht, aber Du kannst doch die Tabelle der zweiten MDB auf der ersten verbinden; dann kannst Du sie ganz normal als Tabelle betrachten - auch TransferSpreadsheet darauf anwenden. Damit landen die Daten auf der zweiten, wo Du sie auch haben willst.

Hilft das?

Gruß

J.

#3

Hallo Thomas,

Du könntest ja auch Excel von Access aus steuern…

Function StarteExcel(ByVal DateiName$) As Object
Dim XL1 As Object ’ Variable für Verweis auf Microsoft Excel.
On Error Resume Next
'Ist Excel bereits gestartet?
Set XL1 = GetObject(, „Excel.Application“)
'Fehler => nein! Neu starten…
If Err 0 Then Set XL1 = CreateObject(„Excel.Application“)
On Error GoTo 0
If Len(DateiName) > 0 Then XL1.Workbooks.Open DateiName
'Jetzt könnte man im Prinzip alles das machen,
'was man auch in Excel-Macros machen kann!
XL1.Visible = True
Set StarteExcel = XL1
Set XL1 = Nothing ’ Verweis auf Anwendung und Tabelle freigeben.
End Function

Das klappt übrigens auch mit z.B. Word - einfach „Excel.Application“ ersetzen durch „Word.Application“ (die Kunst ist eigentlich nur, den internen Namen der jeweiligen Applikation herauszufinden)!

Kurt
http://www.fortwaengler.de

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]