Hi, keine Angst, hab die Suche verwendet und wurde da auch fündig [siehe hier]
Leider klappt das bei mir nicht so ganz, immer wenn ich die Daten aus Access in ein Spreadsheet in Excel exportieren möchte, sagt er mir, dass es schon vorhanden ist, änder ich den Namen, findet er das Objekt nicht.
Hier mal n Auszug aus meinen Code
Hab sowohl versucht xlRange, wo er sagt, dass die Tabelle 'Auswertung' bereits vorhanden ist (Error 3010), und xlWs, wo er sagt, dass der Datentyp falsch ist, war aber nur n Test mit xlWs, muss wohl n String mit der Bezeichnung rein
Sowohl in Access, als auch in Excel besteht eine Tabelle mit dem Namen Auswertung.
Danke für baldige Hilfe.
Carsten
Leider klappt das bei mir nicht so ganz, immer wenn ich die Daten aus Access in ein Spreadsheet in Excel exportieren möchte, sagt er mir, dass es schon vorhanden ist, änder ich den Namen, findet er das Objekt nicht.
Hier mal n Auszug aus meinen Code
Code:
(...)
strFile = "P:\Eigene Dateien\Datenbank - Einsatzplanung\" & txtDatum.Value & ".xls"
Dim xlApp As Object
Dim xlWb As Object
Dim xlWs As Object
Set xlApp = CreateObject("Excel.Application")
Set xlWb = xlApp.Workbooks.Open(strFile)
Set xlWs = xlWb.Worksheets("Auswertung")
(...)
Dim xlRange As String
xlRange = "Auswertung"
DoCmd.TransferSpreadsheet acExport, 8, "Auswertung", strFile, True, xlRange
Hab sowohl versucht xlRange, wo er sagt, dass die Tabelle 'Auswertung' bereits vorhanden ist (Error 3010), und xlWs, wo er sagt, dass der Datentyp falsch ist, war aber nur n Test mit xlWs, muss wohl n String mit der Bezeichnung rein
Sowohl in Access, als auch in Excel besteht eine Tabelle mit dem Namen Auswertung.
Danke für baldige Hilfe.
Carsten