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 :

SUMPRODUCT en VBA


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre actif
    Homme Profil pro
    fonctionnaire utilisant VBA
    Inscrit en
    Août 2012
    Messages
    21
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : fonctionnaire utilisant VBA
    Secteur : Service public

    Informations forums :
    Inscription : Août 2012
    Messages : 21
    Par défaut SUMPRODUCT en VBA
    Bonjour à toutes et à tous,

    Voici mon problème :

    Dans la cellule "B5" de "Feuil2" d’un classeur Excel je souhaite indiquer, en utilisant VBA (et non Excel) , le résultat d’un comptage opéré à partir d’un tableau se trouvant en "Feuil1". En fait, je souhaite compter le nombre de fois où, en "Feuil1", il est indiqué "achevé" en colonne "C" (informations se trouvant parmi les données allant de "C2" à "C50") quant en colonne "A" (parmi les données "A2" à "A50") il y a la mention "Service 1". Il s'agit d'un comptage avec 2 conditions.

    Merci de m’indiquer la syntaxe en VBA en utilisant SUMPRODUCT.

    Par avance merci

  2. #2
    Membre Expert
    Homme Profil pro
    Retraité
    Inscrit en
    Avril 2011
    Messages
    1 858
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Retraité

    Informations forums :
    Inscription : Avril 2011
    Messages : 1 858
    Par défaut
    Bonjour,

    Première solution : tu places la formule en B5
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Worksheets("Feuil2").Range("B5").Formula = "=SUMPRODUCT((Feuil1!A2:A50=""Service 1"")*(Feuil1!C2:C50=""achevé"")*1)"
    Deuxième solution : tu places la valeur résultant de la formule en B5
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Worksheets("Feuil2").Range("B5") = Evaluate("=SUMPRODUCT((Feuil1!A2:A50=""Service 1"")*(Feuil1!C2:C50=""achevé"")*1)")
    Cordialement.

Discussions similaires

  1. Sumproduct dans VBA avec plusieurs variables
    Par ADV974 dans le forum Macros et VBA Excel
    Réponses: 6
    Dernier message: 26/06/2018, 13h14
  2. [Toutes versions] SumProduct (utilisation en VBA)
    Par Invité dans le forum Macros et VBA Excel
    Réponses: 7
    Dernier message: 28/06/2013, 19h51
  3. [XL-2007] Compter les cellules d'une même couleur avec SUMPRODUCT en VBA
    Par apt dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 06/10/2012, 21h25
  4. [XL-2003] sumproduct en VBA
    Par bigboy dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 31/08/2012, 12h34
  5. WorksheetFunction. SumProduct vba
    Par alsimbad dans le forum Macros et VBA Excel
    Réponses: 13
    Dernier message: 15/06/2008, 06h21

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