我有下面的VBA代码，它在执行时返回标准表达式'中的'数据类型不匹配。我似乎无法找出它为什么给我这个错误。 任何人都可以帮助我吗？ VBA： Public Function GezaagdeOmzet(ByVal TotaalPrijs As Double, ByVal AantalArtiklesPerOrder As Double, ByVal TotaalArtiklesPerOrder A
我正在寻找一种在使用VBA访问时创建自定义属性的方法。 这里是我多远，我在哪里卡住： 自定义属性的值（其名称为FOO）读起来像这样： Dim cnt As Container
Dim doc As Document
Set cnt = DBEngine(0)(0).Containers!Databases
Set doc = cnt.Documents!userDefined
doc.
我使用类似下面从一个未绑定的形式将信息传递到另一个（借口没有错误检查）： Sub Button_Click()
Dim db as DAO.database
Dim rs as DAO.recordset
Dim sql as string
docmd.openform "NextFormIamAbouttoUse"
sql = "SELECT * FROM tblMain WHER
我正在使用以下代码从Access应用程序中刷新Excel数据透视表。刷新枢纽后，保存和关闭Excel应用程序的最佳方法是什么？在我的最后一次尝试中，代码在枢纽刷新之前试图保存并关闭。 Private Sub Command161_Click()
Dim objXL As Object, x
On Error Resume Next
Set objXL = Creat
当传递对函数的引用时，是否有方法确定对象类型？ 我正在使用安全权限函数，它确定用户是否有权查看/编辑通过引用传递给它的窗体。我想扩大这个以包括报告。 为了保持功能一般，我想传递一个裁判为任何一个形式或作为对象的报表，如： function gfSecurity_Permission(obj as Object) 不过，我需要确定对象的type在功能范围内。 有没有人知道一种方法来做到这一点？ MT
我想写一些自定义VBA函数来执行一组查询中特定字段的计算。这是我目前有： Public Function TVM(LEN_SEC As Double, ADT_CUR As Integer, TRK_PCT As Integer)
TVM = LEN_SEC * ADT_CUR * TRK_PCT/100#
End Function
这工作得很好，但是当我创建查询我必须做这样的事情