Day134 Automating Macro to start, VBS Code
VBS SCRIPT TO USE:
Set fso = CreateObject("Scripting.FileSystemObject")
curDir = fso.GetAbsolutePathName(".")
Set myxlApplication = CreateObject("Excel.Application")
myxlApplication.Visible = True
Set myWorkBook = myxlApplication.Workbooks.Open(curDir & "\Excel Automation Example.xlsm" )
myWorkBook.Application.Run "Runall.RunAll"
WScript.Sleep 300
myWorkBook.Application.Run "Send_Email_With_snapshot"
myxlApplication.Quit