Anónimo respondió:
Revisá el evento OnTime del objeto Application; un ejemplo podría ser Private Sub Workbook_Open() DoEvents Application.OnTime EarliestTime:=TimeValue("16:00"), Procedure:="Afuera" End Sub y en un modulo tipeas el procedimiento Afuera; algo como Sub...