IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

Excel somme de nombre rouge


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Nouveau candidat au Club
    Profil pro
    Inscrit en
    Juillet 2007
    Messages
    1
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2007
    Messages : 1
    Par défaut Excel somme de nombre rouge
    Salut à tous,

    j'essaye de trouver soit une fone fonction ou une macro pour calculer la somme de chiffres dans une colonne ou plusieurs exemple:

    1
    3 (chiffre police rouge)
    4
    5(chiffre police rouge)
    6
    somme des rouges= 8

    de tel sorte que si je change la couleur d'un chiffre (du nooir au rouge) ce dernier sera pris en compte par la somme immédiatement.

    Merci par avance.

  2. #2
    Membre Expert
    Avatar de zazaraignée
    Profil pro
    Étudiant
    Inscrit en
    Février 2004
    Messages
    3 174
    Détails du profil
    Informations personnelles :
    Localisation : Canada

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Février 2004
    Messages : 3 174
    Par défaut
    Salut

    Je me suis penchée sur ton problème mais je n'ai pas la solution complète.

    Pour créer une nouvelle formule utilisable sur une feuille Excel, tu mets une Fonction dans un module standard.
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    Function SommeRouge(r As Range) As Double
        Dim c As Range
        Dim temp As Double
        temp = 0#
        For Each c In r
            If c.Font.Color = vbRed Then
                temp = temp + c.Value
            End If
        Next
        SommeRouge = temp
    End Function
    Dans la cellule tu tape
    où A1:A10 est la plage (le range) qui contient les nombres dont certains sont rouges.

    Le problème, c'est que (pour l'instant) si tu mets d'autres chiffres en rouge, la fonction n'est pas automatiquement recalculée.

    Je fais d'autres tests et t'en reparle.

  3. #3
    Membre chevronné

    Avatar de Deepin
    Homme Profil pro
    Ingénieur - Chef de projet Modélisation/Simulation
    Inscrit en
    Avril 2004
    Messages
    3 164
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Afrique Du Sud

    Informations professionnelles :
    Activité : Ingénieur - Chef de projet Modélisation/Simulation
    Secteur : Industrie

    Informations forums :
    Inscription : Avril 2004
    Messages : 3 164
    Par défaut
    je crois qu'il faut la marquer volatile

Discussions similaires

  1. [Excel] Compter le nombre de valeurs
    Par Malach dans le forum Excel
    Réponses: 3
    Dernier message: 06/04/2006, 00h04
  2. Réponses: 2
    Dernier message: 05/02/2006, 22h26
  3. Formater des cellules excel en format nombre
    Par _developpeur_ dans le forum Access
    Réponses: 7
    Dernier message: 09/01/2006, 14h13
  4. Somme de nombres limitée
    Par DC dans le forum SQL Procédural
    Réponses: 7
    Dernier message: 29/11/2005, 13h54
  5. [VBA Excel]Somme
    Par ed_dexia dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 21/10/2005, 15h53

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo