将表数据从 access 导出到 excel答案

【问题标题】：Exporting table data to excel from access将表数据从 access 导出到 excel
【发布时间】：2020-07-22 19:44:42
【问题描述】：

我有一个表单，它为最终用户显示一个表的值，该表通过键字段（大多数数字字段 ID）链接到其他表。在此表单中，用户可以选择将表信息导出到 Excel 电子表格，导出功能运行良好，但是工作表字段填充了用作参考的其他表的主字段键的值。除了绑定的列之外，还有什么方法可以导出到 excel 中的任何其他列？

Option Compare Database

Private Sub cmd_Export_Excel_Click()

Luser = Environ("username")

desktop_path = "C:\Users\" & Luser & "\Desktop\DHB - DPAR.xlsx"

On Error GoTo SubError
 
    'For this to run, you'll need to replace the query name with your query and the file name
    'with a valid path on your machine
    DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel12Xml, "tblDPAR", _
    desktop_path
 
  
    MsgBox "File exported successfully", vbInformation + vbOKOnly, "DHB - Design Dept"
   
SubExit:
    Exit Sub
   
SubError:
    MsgBox "Error Number: " & Err.Number & "= " & Err.Description, vbCritical + vbOKOnly, "An error occured"
    GoTo SubExit

End Sub

【问题讨论】：

我猜它是导出主字段键的值，因为它是这样设置的。属性中的绑定列是保存这些值的列。困难的选择是重新设计，但可能您可以创建一个查询以将所需的列导出到 Excel。
是的，你解决了我的头痛问题。创建了一个查询，更改了字段并将其用作 vba 代码的基础。谢谢！！

标签： excel ms-access export-to-excel

【解决方案1】：

我还不知道如何标记用户如何回答并帮助我解决这个问题，但它在 cmets 中。

他建议创建一个查询并将其用作导出代码的基础。它现在正在工作。

【讨论】：