Changer le signe d'un chiffe "+ ou -"

picard gaetan -  
eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,
Je vous explique je cherche à commander la valeur négative ou positive d'un chiffre à partir du texte inscrit dans une autre cellule.

Exemple: quand j’inscris dépense en A1 je voudrais que mon chiffre présent en A4 soit négatif
et quand je marque recette en A1 je voudrait que mon chiffre soit positif.

Avez-vous une idée de comment faire?

4 réponses

  1. Gyrus Messages postés 3360 Statut Membre 526
     
    Bonjour,

    Avec une procédure évènementielle à placer dans le module de la feuille
    Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$A$1" Or Target.Address = "$A$4" Then
    Application.EnableEvents = False
    Select Case Range("A1").Value
    Case "Dépense"
    Range("A4") = -Abs(Range("A4"))
    Case "Recette"
    Range("A4") = Abs(Range("A4"))
    Case Else
    Range("A4") = ""
    End Select
    Application.EnableEvents = True
    End If
    End Sub

    A+
    0
  2. picard gaetan
     
    Désolé je n'arrive pas à l'intégrer
    N'existe il pas des fonctions existantes sous excel ?
    0
  3. Gyrus Messages postés 3360 Statut Membre 526
     
    Tu ne peux pas avoir à la fois la cellule libre pour une saisie et placer une formule dans cette même cellule.

    Avec Excel, tu peux éventuellement faire la saisie dans une cellule intermédiaire et placer le résultat dans une autre cellule.

    Voici un exemple de traitement avec VBA et un autre avec formule.
    https://www.cjoint.com/c/FLfoAeAyCN1

    A+
    0
  4. eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   7 281
     
    Bonjour,

    Le plus simple est de faire 2 colonnes, une pour les recettes et une autre pour les dépenses.
    eric
    0