既存のAccess 2007マクロのコード変更 - 既存のExcel 2007ワークブックで新しいExcelワークシートを作成および開くことを目指すか？

Question

新しいExcelワークを作成するコードはですが、Access 2007のコントロールボタンをクリックするたびに同じExcel 2007ブックにシートのコードを作成する必要があります。 コントロールボタンをクリックすると、Accessクエリが開き、Excelワークシートとが開きます。 Excelブック/シートが必要です。 Excelの作業帳がマクロ有効作業ブック.xlsm形式でなければなりません

' 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

あなたはTransferSpreadsheetのを使用することができます：TransferSpreadsheetメソッドが機能

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

FollowHyperlink XLFile 

''OR 

Shell "Excel.exe " & xlfile, vbNormalFocus