XL 2016 executer macro au changement de la valeur cellule

Bonjour.
Alors que vous aimeriez que ça fonctionne… quand ?
Si c'est à l'ouverture du classeur mettez une Private Sub WorkBook_Open dans le module ThisWorkbook

Bonjour Dranreb
à l heure indiquée en R2 soit dans mon exemple toutes les 1 minutes je me laisse cette cellule T2 pour indiquee l intervalle exemple 00: 05 soit toutes les 5 minutes

donc quand le la valeur change cela execute macro
Private Sub Worksheet_Calculate()
If Range("R2") <> valeur Then
Call macro100
End If
End Sub

seulement cela fonctionne avec un calcule pas dans mon exemple

J ai travaillé sur
Application.OnTime Now + TimeValue("00:00:10"), "my_Procedure"

cela fonctionne mais beug par la suite

Voila Une solution trouvée sur un site américain qui fonctionne super
complétement différent de ce que je souhaitais mais je contrôle 'intervalle de temps et cela execute la macro


Public RunWhen As Double
Public Const cRunWhat = "my_Procedure"

Sub StartTimer()
RunWhen = Now + TimeSerial(0, 0, 10)
Application.OnTime earliesttime:=RunWhen, procedure:=cRunWhat, _
schedule:=True
End Sub

Sub StopTimer()
On Error Resume Next
Application.OnTime earliesttime:=RunWhen, _
procedure:=cRunWhat, schedule:=False
End Sub

Sub my_Procedure()
Columns("A:A").Select
Selection.Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove
Call StartTimer

End Sub

Jaurais aimer trouver une solution avec Worksheet_Calculate ou Worksheet_Change si heure change

reve24 à dit:

à l heure indiquée en R2

Cliquez pour agrandir...

Non mais ça c'était évident. Ma question était plutôt quand voulez vous que la procédure soit planifiée pour son exécution à l'heure indiquée dans la cellule. À l'ouverture du classeur ?
Si oui mettez le Application_OnTime dans une Sub WorkBook_Open dans le module ThisWorkbook