Code Änderung des bestehenden Access 2007 Makros - Ziel zu erstellen und zu öffnen (von Access) ein neues Excel-Arbeitsblatt in bestehenden Excel 2007 Work-Book?

Question

Hier ist der Code, der das neue Excel funktioniert Buch, aber ich brauche den Code zum Erstellen einer neuen Arbeit BLATT in der gleichen Arbeitsmappe Excel 2007 jedes Mal, wenn ich auf die Schaltfläche Access 2007 klicken. Klicken Sie auf die Schaltfläche Steuerelement muss die Access-Abfrage öffnen und erstellen Sie die Excel-Arbeit Blatt und öffnen Sie das Excel-Buch/Blatt. Das Arbeitsbuch Excel muss ein Makro aktiviert Arbeitsbuch XLSM Format

' Command104ContrDonatWeekly_Click 
' 
'------------------------------------------------------------ 
Private Sub Command104ContrDonatWeekly_Click() 
On Error GoTo Command104ContrDonatWeekly_Click_Err 

    DoCmd.OpenQuery "Contributors Who Donated in Past Week", acViewNormal, acEdit 
    DoCmd.OutputTo acOutputQuery, "Contributors Who Donated in Past Week", "ExcelWorkbook(*.xlsx)", "C:\Users\Michael1\Desktop\KSN\DistributionListWeekly.xlsx", True, "", 0, acExportQualityScreen 


Command104ContrDonatWeekly_Click_Exit: 
    Exit Sub 

Command104ContrDonatWeekly_Click_Err: 
    MsgBox Error$ 
    Resume Command104ContrDonatWeekly_Click_Exit 

End Sub 

Answer 1

sein können Sie Transfer verwenden:

XLFile = "C:\Docs\MyXLFile.xls" 
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, _ 
    "MyTableOrQuery", XLFile, True, "Sheet2" 

FollowHyperlink XLFile 

''OR 

Shell "Excel.exe " & xlfile, vbNormalFocus