2014-03-02 35 views
0

我有一个宏,它运行一系列步骤并在MS Acces.s中输出一个报告。我希望使用我的表单中的变量来命名此报告并存储在一个特定的文件。无法使用RunCode从访问宏调用我的VBA例程

我写了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 

从我的宏我叫Forms![Date Form]!FileLocator在RunCode

+0

[MS Access RunCode宏无法找到我的过程]的可能重复(http://stackoverflow.com/questions/17244980/ms-access-runco​​de-macro-cannot-find-my-procedure) –

+0

不!将其更改为功能也不起作用。不显示任何错误。但只是没有运行该功能或子 –

+1

函数需要在“常规”VBA模块中,而不是在特定形式的类模块中。在Access中执行'Create> Module',然后将该函数作为'Public Function'移动到那里。 –

回答

1

刚把这个问题我自己,原来你不能有模块名称相同的函数名。

希望这也是你的问题。

+0

no my module has a default name module1 :( –