Bonjour

C'est possible de le faire avec une macro événementielle toute simple mais pour cela il faudrait nous dire en fonction de quoi on reconnaît une dépense car il faut bien pouvoir distinguer avec la saisie d'une autre cellule de la même ligne le négatif du positif.
Toujours zen

Bonjour

Comme tu ne me dis pas les colonnes concernées, je t'ai fait la macro paramétrable à placer dans la feuille de saisie (voir mode d'emploi, si nécessaire)

Private Sub Worksheet_Change(ByVal sel As Range)
Dim colm As Integer ' colonne montant
Dim colt As Integer ' colonne type
    colm = Asc("D") - 64    ' remplacer D par colonne montant
    colt = Asc("B") - 64    ' remplacer B par colonne type
    If sel.Column = colm And Cells(sel.Row, colt) = "Dépense" Then
        Application.EnableEvents = False
        sel.Value = sel.Value * -1
        Application.EnableEvents = True
    End If
End Sub

Bonjour

C'est une macro événementielle qui se déclenche automatiquement sans rien faire d'autre que la saisie lors de chaque saisie et modifie la colonne montant paramétrée.

Tu suis le lien du mode d'emploi que je t'ai mis pour la copier sur la feuille VBA de saisie et tu remplaces les bonnes colonnes à l'endroit précisé en gras

    colm = Asc("D") - 64    ' remplacer D par colonne montant
    colt = Asc("B") - 64    ' remplacer B par colonne type

Bonjour

Ah ! L'informatique.

Elle ne pardonne pas les erreurs : c'est 0 ou 1 pas peut-être !

Heureux de t'avoir aidé !
Toujours zen