Somme si deux criteres

Bonjour le forum

Avec le fichier joint je voudrais calculer la somme si deux critères sont remplis

1/le code du combo2

2/le mois dans le textbox3 en "mm"

Je vous remercie d'avance de vos conseils

A+

26test.xlsm (20.93 Ko)

Bonjour,

Il manque un certain nombre d'informations pour que tu aies une réponse satisfaisante :

  • La somme doit être faite dans l'UF ? Si ou, dans quel TextBox ? Si non, ou ?
  • Que faut-il sommer ? Quelles données ? Qui sont sur quelle feuille ? Dans quelle colonnes ?
  • Il n'y a aucune donnée dans le fichier, donc tests impossible.

A+

Benoît Marchand

[Benead}

Bonjour Benead

Merci de t’intéresser à mon problème

En effet je me suis mal exprimé

Je renvoie le fichier avec quelques données

La somme devrait apparaitre dans l'USF

et correspondre a la colonne C

En exemple concret

En sélectionnant dans le Combo 2 le code 50 et dans le texbox3 le mois 03

je voudrais trouver en Textbox 2 la somme 13 120

Ci joint fichier

Merci

A+

20test.xlsm (23.61 Ko)

Bonsoir,

A mettre dans le module de l'UF :

Private Sub CommandButton2_Click()
   Dim oSomme As Double, Lig As Long
   If TextBox3 >= "01" And TextBox3 <= "12" Then
      With ThisWorkbook.Worksheets("Feuil2")
         For Lig = 2 To .UsedRange.Rows.Count
            If IsDate(.Cells(Lig, "D").Value) And .Cells(Lig, "D").Value <> "" Then
               If .Cells(Lig, "A").Text = ComboBox2.Text And Format(Month(.Cells(Lig, "D").Value), "00") = TextBox3.Text Then
                  oSomme = oSomme + .Cells(Lig, "C").Value
               End If
            End If
         Next Lig
      End With
   End If
   TextBox2.Value = oSomme
End Sub

Si tu dois avoir des centaines de lignes, il faudrait peut-être passer par une formule Excel qui devrait être plus rapide (dépend du contexte).

A+

Benoît Marchand

[Benead]

ReBenead

Chapeau

ça marche nickel

Merci beaucoup.

Je prend note de la remarque sur le nombre de lignes

(Vous dites des centaines) mais pouvez vous m'expliquer pourquoi

on devrait recourir à la formule excel dans ce cas

A bientôt

Re,

Parce que, d'une manière générale, les fonctions intégrées d'Excel sont toujours plus rapides que les fonctions personnalisées ou les macros utilisateurs ; ce sont des formules faites par des informaticiens Microsoft qui font partie intégrante d'Excel.

Mais dans certains cas, comme ta demande par exemple, il faut des centaines de lignes de données pour que tu puisses voir la différence... En fait cela dépend de plein de critères (optimisation du code, puissance processeur, taille de la mémoire, version d'Excel, version de windows...)

A+

Benoît Marchand

[Benead]

Re Benead

C'est très gentil de ta part

J'ai bien compris

Merci

Bonne nuit

Rechercher des sujets similaires à "somme deux criteres"