Execution sur vba

Fermé
yoyo - 5 juin 2008 à 14:55
 yoyo - 6 juin 2008 à 08:58
Bonjour,
J'ai un problème ma maccro sur vba ne s'éxécute pas automatiquement
j'ai modifié les soldes pour les faire passer la cellule concerné par la maccro en négatif mais le message que je demande ne s'aaffiche pas à part si j'éxécute la maccro moi même.

serait il possible de me corriger cette maccro?svp merci d'avance

Sub alerte()
Dim solde As Integer
Dim alerte As Integer
Dim final As Integer

final = Worksheets("DECEMBRE").Cells(37, 14).Value

If final > 3000 Then
alerte = MsgBox("attention solde de caisse élevé:" & final)

Else
If final < 0 Then
alerte = MsgBox("IMPOSSIBLE SOLDE DE CAISSE NEGATIF, MODIFICATION OBLIGATOIRE")
End If

End If




End Sub

1 réponse

Ivan-hoe Messages postés 433 Date d'inscription dimanche 17 février 2008 Statut Membre Dernière intervention 17 octobre 2008 309
5 juin 2008 à 18:19
Bonjour Yoyo,
il faut toujours un évènement pour exécuter une macro. Une macro peut être lancée manuellement par l'utilisateur, ou en appuyant sur un bouton, ou encore appelée par une autre macro.
Ce que tu peux faire, c'est utiliser un évènement de ta feuille, par exemple Worksheet_Calculate : ta macro s'exécutera chaque fois qu'un calcul se fait dans ta feuille.
Clique droit sur l'onglet DECEMBRE, Visualiser le code et colle le code ci-dessous :
Private Sub Worksheet_Calculate()

Dim final As Integer

final = Worksheets("DECEMBRE").Cells(37, 14).Value
If final > 3000 Then
    MsgBox ("attention solde de caisse élevé: " & final)
ElseIf final < 0 Then
    MsgBox ("IMPOSSIBLE SOLDE DE CAISSE NEGATIF, MODIFICATION OBLIGATOIRE")
End If

End Sub

Est-ce que ça arrange ton problème ?
I.
0
bonjour ,

ouah trop bien merci beaucoup c'est exactement ce que je désirais que le programme effectue. Encore merciiiiiiiiiiii !
0