Résolu Execution macro Word 2007

[astaaroth]

Bonjour,

j'aimerais solliciter vôtre aide, car je bloque un peu la!

Je dois m'occuper d'un document word qui execute plusieurs calculs lors de l'actualisation des champs du document, or j'ai une valeur qui si elle est trop grande fais planter le reste des calculs.

J'aimerais donc pouvoir faire apparaitre un message d'erreur lorsque le signet de cette valeur dépasse la valeur maximale, mais je n'arrive pas à faire executer la macro après l'actualisation des champs ou automatiquement.

Merci d'avance bonne soirée

 

[astaaroth]

Problème résolu!

 

[zeb]

Solution, s'il te plaît

 

[astaaroth]

Comme j'ai pas trouvé de macro qui s'exécute toute seule au moment ou on change la valeur ou on met a jour les champs,
j'ai procédé en 3 macro : - 1 qui se lance en autoopen,
- 1 qui est appelé par la macro Auto open et qui se répète toute les 15 secondes
- la dernière appelé par la précédente qui fais une différence de valeur et fais apparaitre un message
d'erreur si jamais ce n'est pas bon

En gros le message d'erreur se répète toutes les 15 secondes si la valeur n'est pas changée.

Je ne vous met pas le code entier mais les appels entre macro:
[cpp]Sub AutoOpen()
'
' AutoOpen Macro
'
Call Macro5

End Sub

Sub Macro5()

' Appel récursif de la fonction Macro5
Application.OnTime When:=Now + TimeValue("00:00:15"), Name:="Macro5"
' Appel de la fonction Macro6
Call Macro6

End Sub

Sub Macro6()


Dim MyResult As Long
Dim Var1 As Long
Dim Var2 As Long

If MyResult = (Var1 < Var2) = True Then

MsgBox

End If
End Sub[/cpp]

Merci quand même ces forum sont très utiles j'y ai trouvé plein d'éléments qui m'ont aidé à me mettre sur la voie

 

[zeb]

Merci astaaroth,
Puisse ta solution en aider d'autres.

En effet, les événements gérés par VBA/Word sont drastiquement peu nombreux ! :/

 

[astaaroth]

Meilleure réponse sélectionnée par astaaroth.