Excel Version auswählen bei Automatisierung

09/07/2008 - 11:45 von Jens Hofmeier | Report spam
Hallo NG,

ich exportiere ein paar Daten von AC03 nach XL füge noch was in den Sheet
ein und speicher das ganze. Funktioniert wunderbar, allerdings speichert er
das ganze im XL07 Format, ich hàtt aber gern XL03. Beide Versionen sind auf
meinem Rechner installiert. Kann ich AC irgendwie beibringen? Hier der Code

Dim xlapp As Object
Dim xlWB As Object
Dim xlsheet As Object

Dim rst As DAO.Recordset
Set rst = CurrentDb.OpenRecordset("SELECT * FROM qry_Toplist")

Set xlapp = CreateObject("Excel.Application")
Set xlWB = xlapp.Workbooks.Add
Set xlsheet = xlWB.Sheets(1)

<schnipp>

xlWB.Close True, "c:\toplist.xls"
Set xlsheet = Nothing
Set xlWB = Nothing
xlapp.Application.Quit
Set xlapp = Nothing

Gruss,

Jens
 

Lesen sie die antworten

#1 Peter Doering
09/07/2008 - 12:33 | Warnen spam
Hallo,

Jens Hofmeier wrote:

ich exportiere ein paar Daten von AC03 nach XL füge noch was in den Sheet
ein und speicher das ganze. Funktioniert wunderbar, allerdings speichert er
das ganze im XL07 Format, ich hàtt aber gern XL03. Beide Versionen sind auf
meinem Rechner installiert. Kann ich AC irgendwie beibringen?



Leider nicht. Siehe

http://groups.google.com/group/micr...6d2e?hl=en

Gruss - Peter

Ich beantworte keine Fragen per Email.
Mitglied im http://www.dbdev.org
FAQ: http://www.donkarl.com

Ähnliche fragen