Hi,
ich nehme mal, das ganze soll 5 Minuten nach dem Öffnen der Mappe passieren?
Dann folgendes in's Modul "DieseArbeitsmappe":
Private Sub Workbook_Open()
Application.OnTime Now + TimeValue("00:05:00"), "Test"
End Sub
In ein Standard-Modul (Einfügen - Modul) kommt ein Makro, das in diesem Fall Test heisst, und dem dann alles steht, was nach 5 Minuten passieren soll:
Sub Test()
MsgBox "5 Minuten sind rum"
'Und was sonst noch passieren soll
End Sub
Schönen Gruß,
Andi