rh.finances
XLDnaute Occasionnel
Bonjour à tous les colistiers de ce super site!
je ne suis pas un grand spécialiste du langage Vba et je bute sur un problème dont je n'ai pas réussi à trouver la solution malgré plusieurs recherches sur le net.
dans mon fichier Excel ci-joint - onglet "nom agent", j'ai créé la macro suivante :
cette macro fonctionne très bien, toutefois, je souhaiterais simplement que la msgbox ne s'affiche qu'une seule fois lors de la survenance de l’événement, puis cesse ensuite de fonctionner et ce même si la condition déclenchant la macro demeure remplie.
j'ai essayé de tenter des trucs avec "do", "undo" mais rien de concluant.
merci d'avance pour votre aide
Alex
je ne suis pas un grand spécialiste du langage Vba et je bute sur un problème dont je n'ai pas réussi à trouver la solution malgré plusieurs recherches sur le net.
dans mon fichier Excel ci-joint - onglet "nom agent", j'ai créé la macro suivante :
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
If Range("droit_subrogation") < 0 Then
MsgBox "la subrogation ne peut être appliquée. les IJ doivent être perçues directement par l'agent et les jours d'absence retirées de la paie", vbOKOnly + vbInformation, "subrogation"
End If
ActiveSheet.Name = Range("nom").Value
End Subcette macro fonctionne très bien, toutefois, je souhaiterais simplement que la msgbox ne s'affiche qu'une seule fois lors de la survenance de l’événement, puis cesse ensuite de fonctionner et ce même si la condition déclenchant la macro demeure remplie.
j'ai essayé de tenter des trucs avec "do", "undo" mais rien de concluant.
merci d'avance pour votre aide
Alex