解決Access2007以上版本報錶導(dǎo)齣沒有Excel選項的辦法

在Access2003中，可以右鍵-導(dǎo)齣 Excel格式。這箇功能非常方便有用。但是在Access2007之後，報錶導(dǎo)齣沒有 導(dǎo)齣Excel選項。

所以用戶無法直接將報錶導(dǎo)齣爲Excel格式。

在一箇博客帖子中，提供一箇可以從Access 2007中導(dǎo)齣報錶到Excel 中的解決方案。

具體是使用Access 2007中提供的導(dǎo)齣到XML選項來使用Excel中的報錶數(shù)據(jù)。下麵給齣瞭詳細的步驟：

1.如一箇學(xué)生數(shù)據(jù)庫，有箇學(xué)生信息報錶，其中列齣瞭所有學(xué)生信息：

2.導(dǎo)齣此報錶 =》菜單欄功能區(qū)中的“導(dǎo)齣”選項卡，如下圖所示的選項：

3.從列錶中選擇XML File選項，如下圖所示的導(dǎo)齣曏導(dǎo)：

第一步：選擇文件路徑和文件名。

第二步：選擇要導(dǎo)齣的信息。這裡有三箇選項：1.數(shù)據(jù)（XML）2.模式（XSD）3.樣式（XSL），在這裡選擇適當?shù)倪x項。

如果想在Excel中使用XML文件，可以選擇選項1（數(shù)據(jù)）和選項2（模式）。

第三步：選定後，文件將被保存到選定的位置。

其中，有一箇選項可以保存導(dǎo)齣步驟，以便下次選擇導(dǎo)齣到“XML文件”時，將直接穫?cè)”４娴脑O(shè)置併執(zhí)行導(dǎo)齣操作。

4.做到這裡，已經(jīng)成功導(dǎo)齣瞭XML文件和架構(gòu)（如果選中）。如果本機excel支持XML，您可以打開Excel界麵，然後選擇文件=》 打開，然後選擇剛纔在＃3中導(dǎo)齣的XML文件。Excel將提示打開選項。選擇“XML錶”。

5.如果沒有使用XML文件導(dǎo)齣的XSD結(jié)構(gòu)，則會收到以下消息作爲信息對話框。

6.點擊確定，數(shù)據(jù)就可以在Excel中使用瞭。如下圖：

附：使用VBA解決方案

Public Sub OutPuttoExcel()
'    initialize variables
    Dim strReportName As String
    Dim strPathUser As String
    Dim strFilePath As String
    
'    set variables
    strReportName = "AlarmLetterForSF"
    strPathUser = Environ$("USERPROFILE") & "\my documents"
    strFilePath = strPathUser & strReportName & Format(Date, "yyyymmdd") & ".xls"
    
'    export to excel
    DoCmd.OutputTo acOutputReport, strReportName, acFormatXLS, strFilePath
    
'    launch excel file
    Dim Shex As Object
    Set Shex = CreateObject("Shell.Application")
    Shex.Open (strFilePath)
End Sub