运行时错误“3265”：在此集合中找不到项目。 Access 中的 VBA 模块

大佬教程收集整理的这篇文章主要介绍了运行时错误“3265”：在此集合中找不到项目。 Access 中的 VBA 模块，大佬教程大佬觉得挺不错的，现在分享给大家，也给大家做个参考。

如何解决运行时错误“3265”：在此集合中找不到项目。 Access 中的 VBA 模块？

开发过程中遇到运行时错误“3265”：在此集合中找不到项目。 Access 中的 VBA 模块的问题如何解决？下面主要结合日常开发的经验，给出你关于运行时错误“3265”：在此集合中找不到项目。 Access 中的 VBA 模块的解决方法建议，希望对你解决运行时错误“3265”：在此集合中找不到项目。 Access 中的 VBA 模块有所启发或帮助；

我正在尝试创建一个宏，该宏将为每年的设备审计复制一个表及其相关查询。我复制了在另一个论坛上找到的一些代码，但我在一行的标题中收到错误消息。我对 VBA 不够熟悉，无法理解问题所在，所以我希望能得到一些帮助。

此代码应该替换复制查询中的源表，以便不必每年重新进行查询。代码如下：

Sub updatequery(queryname,Currentsourcetable,NewsourcetablE)

Dim strQryname,strCTbl,strNTbl,strCsql,strNsql As String
Dim defqry As DAO.queryDef

strQryname = queryname
strCTbl = Currentsourcetable
strNTbl = Newsourcetable

Set defqry = CurrentDb.queryDefs(strQryName)

strCsql = defqry.sql
strNsql = replace(strCsql,strNTbl)
defqry.sql = strNsql
defqry.Close

End Sub

错误发生在“设置 defqry”行上。谁能告诉我是什么导致了错误？

预计到达时间：

当我尝试运行上面的代码时，我也在使用下面的代码来填充queryname/Currentsourcetable/Newsourcetable：

Sub Proc1()

Call updatequery(YYYY_Count_of_items_by_floor,Building_Audit_2021,Building_Audit_YYYY)

End Sub

同样，这段代码不是我写的，我复制了别人写的代码，并试图将其用于我需要的地方。

解决方法

大佬总结

以上是大佬教程为你收集整理的运行时错误“3265”：在此集合中找不到项目。 Access 中的 VBA 模块全部内容，希望文章能够帮你解决运行时错误“3265”：在此集合中找不到项目。 Access 中的 VBA 模块所遇到的程序开发问题。

如果觉得大佬教程网站内容还不错，欢迎将大佬教程推荐给程序员好友。

本图文内容来源于网友网络收集整理提供，作为学习参考使用，版权属于原作者。
如您有任何意见或建议可联系处理。小编QQ：384754419，请注明来意。