évènements en fonction du temps

Salut michel,

Pour afficher un message toutes les 30 min, colle ceci dans ThisWorkbook :
Private Sub Workbook_Open()
Toto
End Sub

Et mets ça dans un module standard :
Sub Toto()
MsgBox "BipBip..."
Application.OnTime Now + 1 / 48, "Toto"
End Sub


A+
--
Nicolas B.

bonjour,
je souhaite déclencher un évènement toutes les 30 mn tant
que le classeur est ouvert.
Pouvez vous me conseiller ?
D avance merci