Moyen pour stopper un appel récursif ??

Bonjour tt le monde

j'ai créé un code qui lance un appel récursif toutes les 5 minutes

Sub AutoImportation()

If Range("S9") = "Faux" Then
    End
    Application.OnTime Uneheure, Procedure:="Autoimportation", Schedule:=False
 Else

' Définit l'intervalle avec l'heure actuelle
    Uneheure = TimeSerial(Hour(Time), Minute(Time) + 5, Second(Time))
        ' Appel récursif
        Application.OnTime Uneheure, "Autoimportation"
        Call Importation2

End If

j'ai essayé de bidouiller pr stopper la procédure mais ca ne fonctionne pas !

y a t'il un moyen pour le stopper d'une façon ou d'une autre si la valeur d'une cellule chnage par exemple... ??

Bonjour Nicolas21000

Une petite recherche et vous auriez trouvé ceci
https://www.excel-pratique.com/fr/astuces_vba/ontime

A+