Apparition d'une fenêtre si nombre négatif
Bonjour,
Je souhaite réaliser une macro réalisant cela :
SI un nombre est négatif dans la colonne C alors une fenêtre pop up avec le/ les noms des personnes (colonne B) apparait.
J avais pensé à une structure du type :
Dim i As Integer
For i = 6 To 20
Cells(i, 3).Select
If Val(ActiveCells) < 0 Then
MsgBox "XXXX"
End If
Next
Mais la boucle ne marche pas ... et je sais pas quoi mettre à la place des XXXX (pas glorieux en somme).
Le fichier est à :
https://www.excel-pratique.com/~files/doc/somme.xls
Merci d'avance de votre aide
Pading
Bonjour,
Ta macro modifiée :
Sub fenetre()
Dim i As Integer
For i = 7 To 20
If Cells(i, 3) < 0 Then
MsgBox "le nombre " &Cells(i, 2) & " est négatif"
End If
Next
End SubMessage à modifier à ta convenance, par exemple :
MsgBox Cells(i, 2) & " doit " & -Cells(i, 3) & " €"Bonjour pading,
Je suis intéressé par ta demande qui a été résolu.
Peux tu me montrer un fichier concret STP
J'ai essayé ton fichier en changeant la MAcro rien ne se passe.
Merci d'avance