Hello,

I need to schedule my PC to run an Excel macro automatically at a specified time, for exmaple, 6 PM every day. I have no idea about how to do that. Any help would be greatly appreciated.

Peter

Peter,

http://www.ozgrid.com/Excel/run-macro-on-time.htm

There are many times when it would be great to have any macro run at a predetermined time or run it at specified intervals. Fortunately Excel has made this a relatively simple task, when you know how.

Application.OnTime

This Method is what we can use to achieve the automatically running of Excel Macros. Let's suppose we have a macro that we wish to Run each day at 18:00 (6:00 PM). The first problem will be how to kick-off the OnTime Method. This we can do via the Workbook Open Event. The fastest way to get to the Private Module of the Workbook Object (ThisWorkbook) is to right click on the Excel icon next to "File" and select "View Code"


Have a great day,
Stan

[/code]


stanleydgromjr

Windows Vista Business and Excel 2003, 2007.

Stan,

Thank you very much for your reply. But I think the problem still remains: How to schedule the procedure of "Workbook_Open" to start automatically at a predetermined time, especially when the Excel is not open.

Have a good day,
Peter

Hi Peter

I don't think you can fire the Open event from outside. Either you need to open the Workbook for the event to be fired

or

Use Application.Run to call the Macro in the workbook

Cheers
Shasur

http://www.dotnetdud.blogspot.com

VBA Tips & Tricks (http://www.vbadud.blogspot.com)

How about this?

http://krgreenlee.blogspot.com/2006/...dows-task.html

--JP

Thanks,
Peter

Hi,

I used this code to automate my macro
Private Sub Workbook_Open()

Application.OnTime TimeValue("08:58:00"), "RUN"
Application.OnTime TimeValue("09:00:00"), "RUN"
Application.OnTime TimeValue("10:00:00"), "RUN"
Application.OnTime TimeValue("11:50:00"), "RUN"
Application.OnTime TimeValue("12:00:00"), "RUN"
Application.OnTime TimeValue("13:00:00"), "RUN"
Application.OnTime TimeValue("13:10:00"), "RUN"
Application.OnTime TimeValue("14:00:00"), "RUN"
Application.OnTime TimeValue("15:00:00"), "RUN"
Application.OnTime TimeValue("15:33:00"), "RUN"
Application.OnTime TimeValue("16:00:00"), "RUN"
Application.OnTime TimeValue("16:30:00"), "RUN"
Application.OnTime TimeValue("17:00:00"), "RUN"
Application.OnTime TimeValue("17:30:00"), "RUN"
Application.OnTime TimeValue("18:00:00"), "RUN"
Application.OnTime TimeValue("19:00:00"), "RUN"
Application.OnTime TimeValue("20:00:00"), "RUN"

End Sub
Sub RunAMacro()

Application.RUN "path'!RUN"

End Sub

But the problem is...If my cursor is placed on other excel sheet at above mentioned time then macro executed in that sheet not in 'SGX Macro Annuals'.

Could any one suggest the currect code.

Thanks

I tried this but it is not running can you share excel file.

Hi,

I think you need to use Windows task scheduler to run the workbook at a specified interval.

Here is the XML of an example task.

<?xml version="1.0" encoding="UTF-16" ?>
- <Task version="1.2" xmlns="http://schemas.microsoft.com/windows/2004/02/mit/task">
<RegistrationInfo />
<Triggers />
- <Principals>
- <Principal id="Author">
<UserId>MyName-PC\MyAdminName</UserId>
<LogonType>InteractiveToken</LogonType>
<RunLevel>HighestAvailable</RunLevel>
</Principal>
</Principals>
- <Settings>
<MultipleInstancesPolicy>IgnoreNew</MultipleInstancesPolicy>
<DisallowStartIfOnBatteries>false</DisallowStartIfOnBatteries>
<StopIfGoingOnBatteries>false</StopIfGoingOnBatteries>
<AllowHardTerminate>true</AllowHardTerminate>
<StartWhenAvailable>false</StartWhenAvailable>
<RunOnlyIfNetworkAvailable>false</RunOnlyIfNetworkAvailable>
- <IdleSettings>
<Duration>PT10M</Duration>
<WaitTimeout>PT1H</WaitTimeout>
<StopOnIdleEnd>true</StopOnIdleEnd>
<RestartOnIdle>false</RestartOnIdle>
</IdleSettings>
<AllowStartOnDemand>true</AllowStartOnDemand>
<Enabled>true</Enabled>
<Hidden>false</Hidden>
<RunOnlyIfIdle>false</RunOnlyIfIdle>
<WakeToRun>false</WakeToRun>
<ExecutionTimeLimit>PT72H</ExecutionTimeLimit>
<Priority>5</Priority>
</Settings>
- <Actions Context="Author">
- <Exec>
<Command>C:\Program Files (x86)\IObit\IObit Uninstaller\IObitUninstaler.exe</Command>
<Arguments>/UninstallExplorer</Arguments>
</Exec>
</Actions>
</Task>

__________________
Nostalgia 4 Infinity