Re : temporisation variable
Bonjour
exemple aide "wait", si tu remplaces 10 par range("A1").value...
newHour = Hour(Now())
newMinute = Minute(Now())
newSecond = Second(Now()) + 10
waitTime = TimeSerial(newHour, newMinute, newSecond)
Application.Wait waitTime