如何以編程方式訪問報表工具欄中的MS-Access 97中

我在訪問97一個項目，我必須添加到導出報表的卓越能力。當你在程序中運行報表時，已經有能力導出到Word，並且只通過excel中的某些標題就可以實現excel。如何以編程方式訪問報表工具欄中的MS-Access 97中

通過研究我發現，我也許能得到它使用OutputTo工作，但unfortuneately我不能嘗試這個，因爲我無法找到在報表視圖工具欄的代碼。我找到了實際的報告。我從來沒有使用任何版本的Access，所以我只需要添加一個宏，或者我必須以不同的方式來處理？我找不到代碼已經存在的位置。

來源

2010-08-11 Kyra

要麼使用一個宏用TransferSpreadsheet操作，或用VBA代碼這樣導出：

DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, sQryExport, sPath & "\xls\" & sPrefix & sRptGroup & ".xls" 

    DoCmd.OpenReport "rpt_summary", acViewPreview, , "reportGroupID='" & sRptGroup & "'", acHidden 
    DoCmd.OutputTo acOutputReport, "rpt_summary", "Rich Text Format (*.rtf)", sPath & "\rtf\" & sPrefix & sRptGroup & ".rtf" 
    DoCmd.Close acReport, "rpt_summary"

來源

2010-08-11 18:10:06 Beth

它是如何知道要做到這一點按下導出按鈕時。我需要添加額外的代碼嗎？ – Kyra 2010-08-12 16:01:49

它沒有。你必須告訴它。如果你創建一個導出按鈕，讓按鈕點擊事件調用宏或者將VBA代碼嵌入到一個函數中，然後讓這個按鈕調用它。 – Beth 2010-08-12 17:10:50

如何以編程方式訪問報表工具欄中的MS-Access 97中

回答

相關問題