ms 访问更改报告 RecordSource 与表单

Posted 2023-05-06

【中文标题】ms 访问更改报告 RecordSource 与表单

【英文标题】：ms access change report RecordSource with form

【发布时间】：2015-05-19 22:53:16

【问题描述】：

我有一个表格，我希望它能够保存表格的副本以及生成的报告。我还希望报告的记录源更改为新表的名称。 我已经拿到了报告和表格的副本，我只是想不通 RecordSource 部分。

Dim tabName As String
tabName = Text255.Value

DoCmd.CopyObject , tabName, acTable, "MPO"
DoCmd.CopyObject , tabName, acReport, "MPO"

【参考方案1】：

不要更改报告。使用查询作为报告的来源。

在打开报表之前，调整一下查询的SQL：

Dim db As DAO.Database
Dim qd As DAO.QueryDef

Set db = CurrentDb
Set qd = db.QueryDefs("NameOfYourQuery")
qd.SQL = "Select * From " & YourNewTableName & ""
qd.Close

Set qd = Nothing
Set db = Nothing

【讨论】：

抱歉这么久才回复，自从我发帖那天起我就没有在做这件事了。您能准确解释一下该代码的作用吗？我试图阅读 Microsoft 的解释，但我的 ADD 用他们的长句子打败了我。

它将作为报告源的查询的 SQL 更改为新表的名称。如您所愿。

我还没有完全关注。我发布了我的代码，所以也许你可以更具体地解释一下。

也许您应该重新表述您的问题。我从来不需要调用 CopyObject，我也不熟悉“表格的结果报告”的含义。