Mon fichier excel est ouvert toute la journée et j'aimerais qu'une cellule recalcule tout les 10 minutes.
J'ai pensé créer une macro qui enregistre mon fichier toutes les 10 minutes et de dire à la cellule en question qu'a chaque saving de recalculer la cellule en question.
Par contre, je n'arrive vraiment pas à créer une macro qui enregistre mon fichier à un intervalle de temps.
Pouvez-vous m'aider silvouplait votre aide serait très apprécié et si vous avez une meilleur idée pour mon problème, je suis très ouvert.
D'après ce que j'ai lu, l'enregistrement se fait en cas d'arrêt brutal d'Excel (coupure de courant ou bug).
On peut toujours mettre une macro avec un timer, mais cela va pomper des resources. Mais je n'en vois pas l'utilité à partir du moment qu'en cas d'arrrêt brutal Excel récupère le fichier.
Option Explicit
Declare Function SetTimer Lib "user32" _
(ByVal hwnd As Long, _
ByVal nIDEvent As Long, _
ByVal uElapse As Long, _
ByVal lpTimerFunc As Long) As Long
Declare Function KillTimer Lib "user32" _
(ByVal hwnd As Long, _
ByVal nIDEvent As Long) As Long
Global iCounter As Integer
Sub TimerProc(ByVal hwnd As Long, _
ByVal uMsg As Long, _
ByVal idEvent As Long, _
ByVal dwTime As Long)
'Ici ton code
iCounter = iCounter + 1
Debug.Print "boucle N°" & iCounter
ActiveWorkBook.Save
End Sub
Sub initTimer()
Dim lngTimerID As Long
Dim BlnTimer As Boolean
lngTimerID = SetTimer(0, 0, 1000, AddressOf TimerProc)
If lngTimerID = 0 Then
MsgBox "Timer not created. Ending Program"
Exit Sub
End If
BlnTimer = True
End Sub
