Application.OnTime Time + timevalue("00:15:00"),"macro"
Sub chrono()
Application.OnTime Time + timevalue("00:15:00"),"mamacro"
end sub
Sub mamacro()
bla bla
bla bla bla
bla
bla bla
[COLOR="Red"]call chrono[/COLOR]
end sub