Interdire valeur négative dans une cellule

Bonjour,

Je cherche comment interdire sur excel la valeur négative dans une cellule. J'ai essayé avec l'option validation des données mais accepter quand on fait copier coller.

Bonjour,

n'oublie pas de dire merci, c'est le seul salaire ici.
A part sur tes 2 premières questions, plus aucun ensuite...

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim pl As Range, c As Range
    Set pl = Intersect(Target, [A2:A10]) '[A2:A10] : plage surveillée
    If Not pl Is Nothing Then
        For Each c In pl
            If c < 0 Then
                MsgBox "Annulé, nombre négatif"
                Application.EnableEvents = False
                Application.Undo
                 Application.EnableEvents = True
               Exit For
            End If
        Next c
    End If
End Sub

eric

Bonjour Eriic,

Merci pour ton retour. Cependant, pouvez-vous m'expliquer comment utiliser ce macro?

Pour info, je ne maîtrise pas le VBA.

clic-droit sur l'onglet concerné, 'Visualiser le code' pour afficher VBE, coller le code et adapter la plage.
Retourner dans excel et tester.
Enregistrer sous... le fichier en choisissant le type *.xlsm pour conserver la macro
eric

De rien !
Donc ça se confirme, tu ne reviens que si tu as une question, c'est noté...
eric

Salut eric,

Je voudrais tout d'abord m'excuser pour mon retard et vous remercier de m'avoir aider.