How to run this module from a macro

[william barker]

the following code creates the file as expected when run within the module.

how can this be inserted as a step within a macro, I tried RUNCODE to no avail.

Public Function NRP_Extract()


Dim Cmonth As String
Dim Cday As String
Dim DATENOW As String
Dim FileName As String

If Month(Now()) < 10 Then
Cmonth = "0" & Month(Now())
Else
Cmonth = Month(Now())
End If

If Day(Now()) < 10 Then
Cday = "0" & Day(Now())
Else
Cday = Day(Now())
End If


DATENOW = Year(Now()) & Cmonth & Cday
FileName = "L:\West Chester\Supply Chain Management" & DATENOW & "NRP_Master_Data_Extract.xlsx"




DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel12Xml, "q_NRP_Master_Data_Extract", FileName, True, ""
End Function

[ranman256]

Runcode is correct.
runcode nrp_extract()

you must have the parens. If it still fails,then put a breakpoint on the 1st statement in the code.
run the macro.
then step thru the code (F8) to see where it fails.

[william barker]

Got the following error when trying to run the macro:

The expression you entered has a function name that microsoft access cant find.

[Micron]

Where is the code? AFAIK, it has to be in a standard module, not a form module. Not 100% sure because I don't use macros but I read that somewhere. The function name also cannot be the same as the module.

[william barker]

would you have time for a webex in the next few days? I dont have much experience with what i am doing....

i just added the runcode to a macro and can not get it to execute...

send me your email address if you can

[Micron]

Who, me?
If you are not using features not supported by 2007 I can take a look at your db. Compact, then zip a copy of it and post it here. I'm unfamiliar with remote technologies that people often refer to in this forum and don't wish to expose my computer to remote systems.