Question

我想使用在DropPath表中找到的字段（SetupExp）在DoCmd.OutPutTo中引用

droppath.SetupExp = D:\Export\

这有效

DoCmd.OutputTo acOutputTable, "CustItemExp", "Excel97-Excel2003Workbook(*.xls)", "D:\Export\CustItemExp" & Format(Date, "yymmdd") & ".xls", False, "", 0, acExportQualityPrint

这不是：

DoCmd.OutputTo acOutputTable, "CustItemExp", "Excel97-Excel2003Workbook(*.xls)", "droppath.SetupExp" & Format(Date, "yymmdd") & ".xls", False, "", 0, acExportQualityPrint

应该查看droppath.SetupExp在该位置创建一个名为CustItemExp.csv的CSV文件。

Answer 1

您不能像在窗体或报表上使用对象的属性一样，直接在VBA中引用表或查询字段值。

相反，您需要使用域聚合函数（例如DLookup或DFirst或通过表记录的opening a recordset）来获取表中记录的值。检索值。

根据您的示例，我可能会提出以下建议：

DoCmd.OutputTo acOutputTable, "CustItemExp", acFormatXLS, DFirst("droppath", "setupexp") & "CustItemExp" & Format(Date, "yymmdd") & ".xls"

在DoCmd中调用字段/表

1 个答案: