Auto exe macro

[steven7]

Hi,

I want to run a macro that from a desktop icon

• deletes existing files
• writes in the replacements
• closes access

The macro runs fine on its own, but I have to convert to VB to add the kill function. I get asked for macro name when I run this. Any ideas?



Option Compare Database
'------------------------------------------------------------
' Loading_schedules
'
'------------------------------------------------------------
Function Loading_schedules()
On Error GoTo Loading_schedules_Err
Kill "\\filepath
Kill "\\filepath
DoCmd.OutputTo acOutputQuery, "Loading Patterns", "ExcelWorkbook(*.xlsx)", "filepath", False, "", , acExportQualityPrint
DoCmd.OutputTo acOutputQuery, "PAD Schedule", "ExcelWorkbook(*.xlsx)", "\\filepath", False, "", , acExportQualityPrint
DoCmd.Quit acExit

Loading_schedules_Exit:
Exit Function
Loading_schedules_Err:
MsgBox Error$
Resume Loading_schedules_Exit
End Function

[ranman256]

in the macro, choose:
RUNCODE Loading_schedules()

[steven7]

in the macro, choose:
RUNCODE Loading_schedules()

Excuse my basic knowledge, do I write that in the VB?

[ranman256]

No, these commands go into the autoexec macro, to run the VB shown above.
is that what you wanted?

[steven7]

No, these commands go into the autoexec macro, to run the VB shown above.
is that what you wanted?

if that will allow me to run the macro from a desktop shortcut then yeah. I'm not back in until tomorrow so I will try it then. Thanks.

[JoeM]

If you name a macro AutoExec, it runs whenever the database is opened (provided that VBA/Macros are enabled).
So if you have a macro named AutoExec in your database, and just have a shortcut to that database on the Desktop, clicking it to open the database will in essence run the macros.

[ranman256]

Put this command in the autoexec macro,the when i
it he db opens, it will run.

[Bulzie]

DoCmd.OutputTo acOutputQuery, "Loading Patterns", "ExcelWorkbook(*.xlsx)", "filepath", False, "", , acExportQualityPrint

Do you need \\filepath on this line?

[steven7]

DoCmd.OutputTo acOutputQuery, "Loading Patterns", "ExcelWorkbook(*.xlsx)", "filepath", False, "", , acExportQualityPrint

Do you need \\filepath on this line?

Yes, it specifies the filepath where the file will save to

[steven7]

Put this command in the autoexec macro,the when i
it he db opens, it will run.

Ok, so I created the autoexec macro, which runs as soon as I open the database. Works fine. However, I cannot add the kill function unless I convert to VB which then will not autorun?

[JoeM]

Ok, so I created the autoexec macro, which runs as soon as I open the database. Works fine. However, I cannot add the kill function unless I convert to VB which then will not autorun?

Create a one-line function in VBA that contains your kill command.
You can then run that function from a Macro using the "RunCode" command.