Office: Bericht exportieren per VBA

Hi,


ich wollte wissen ob es moeglich ist ein Report von Access per VBA nach Excel zu exportieren. Mit Queries ging dies so weit ganz gut, habe die gleiche Struktur fuer die Reports/Berichte uebernommen.


'wobei x mein jeweiliger Name fuer den Bericht/Report"

Dim ExcelName As String
Dim Heute
Dim x As String
Heute = Date$
comExceltxt.SetFocus
x = comboExceltxt.Text
ExcelName = "G:\UniUnit\EXCEL\Projects\Access PIMS\Excelsheets\" & " Reports " & Heute & ".xls"
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel97, x, ExcelName, , x
End Sub

wenn ich dies durchfuehre kommt die Fehlermeldung "The Microsoft Jet...... could not find the Object, make sure the Object exists (was es tut, der Bericht liegt vor) and that the path is spelled correctly (auch richtig)

Kann mir einer helfen? Vielen Dank schon im Voraus


Gruss smallguy

:)

 

Hallo,

TransferSpreadsheet exportiert nur Tabellen und Abfragen.

Ich versteh auch den Sinn nicht. Was soll denn ein Bericht in Excel und wie soll der dort dargestellt werden?

 

Eigentlich hat es wie du schon richtig gesagt hast keinen wirklichen Sinn. Es geht mir auch nur darum ob es prinzipiell moeglich wäre ? Reines Interesse.


Gruss smallguy

 

Habe es selber nochmals rausgefunden fuer alle die es interessiert. Hier die Loesung


Private Sub Command52_Click()
Dim ExcelName As String
Dim db As Database
Dim Heute
Dim x As String
comExceltxt.SetFocus
Heute = Date$
Set db = CurrentDb
x = comExceltxt.Text
Reports ALL " & Heute & ".xls"
DoCmd.OutputTo acOutputReport, x, acFormatXLS, ExcelName, True
End Sub


Gruss an alle

 

Auf jedenfall brauchbar! Andere Frage: Ist es eigentlich moeglich nen Bericht als pdf zu exportieren? Das ganze bitte kostenlos (also kein Acrobat PDFWriter oder so)