Alerte Valeur Excel

blueflower -  
Vaucluse Messages postés 27336 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

J'aimerais savoir comment faire pour que Excel alerte l'utilisateur d'un fichier quand une cellule deviens négative.

Je m'explique : j'ai un tableau que des gens doivent remplir. dans ce tableau il y a des cellules qui calculent des pourcentages d'évolution. Si la valeur d'un de ces pourcentage deviens négatif je veux que l'utilisateur ai une alerte qu'il ne puisse ignorer comme une boite de dialogue qui s'ouvre avec écris "Attention la cellule x est négative!"

C'est possible?

Merci beaucoup!!!
Configuration: Windows XP
Internet Explorer 6.0

13 réponses

  1. qmike Messages postés 1599 Date d'inscription   Statut Membre Dernière intervention   594
     
    bonjour
    Un exemple sur les cellules A1:A10
    A adapter
    Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect([A1:A10], Target) Is Nothing Then
    If Target < 1 Then
    MsgBox "Attention : Valeur négative"

    End If
    End If
    End Sub

    http://bvrve.club.fr/Astuces_Michel/55excelvba.html
    0