无法使用RunCode从Access宏调用我的VBA例程

Question

我有一个宏，它运行一系列步骤并在MS Acces.s中输出报告。我希望使用表单中的变量命名此报告并存储在特定文件中。

我已经编写了VB代码来做同样的事情。

当我运行代码时，它运行得非常好，但是从宏开始它不起作用！

Private Sub FileLocator()
If [Forms]![Date Form].[Frame37] = 1 Then
MsgBox ("Working")
x = [Forms]![Date Form].List29
Else
x = [Forms]![Date Form].List25
End If

DoCmd.OutputTo acOutputReport, "41_Webtime less than 40 hours chart", "PDFFormat(*.pdf)", "C:\" & x & "\" & x & ".pdf", True, "", , acExportQualityPrint

End Sub

从我的宏中，我在RunCode中调用Forms![Date Form]!FileLocator

Answer 1

我自己就是这个问题，原来你不能把模块名称与函数名称相同。

希望这也是你的问题。