fonction somme si en vba

C

chris

Guest
Bonjour,
Comment intégrer dans un macro la fonction somme si ?

critères données
cellule A1 = x et cellule B1 = 3
cellule A2 = y et cellule B2 = 1
cellule A3 = x et cellule B3 = 5

J'aimerais que la formule soit insérée après mes données de la colonne "B" dont le nombre de lignes est variable et que si mon critère est "x", ma formule soit "B1 + B3".
j'espère avoir été suffisamment claire dans mes explications.
Merci d'avance
 
G

G.David

Guest
Salut
Perso je décomposerai comme suit
dans une cellule autre ex :T1 = nbval(A:A)

sub sommeuh()

t=cells(1,20).value 'nb de ligne
for i=1 to t ' de la ligne 1 à t
if cells(i,1)="x" then 'si la cellule At = "x" alors
p=p+cells(t,2) 'on ajoute à p la valeur de le cellule Bt
end if ' fin condition
next 'on continue
cells(1,4).value=P ' en D1 on met le résultat

end sub
 
G

G.David

Guest
Bon ne nous fachons pas

la fonction somme.si de la feuille de calcul est non traductionnée (faisons vivre le dictionnaire)
l'emploi est sumif par contre les objet range sont obligatoires pour définir les plages
d'ou

Sub Macro1()
'
' Macro enregistrée le 15/07/2004 par David

T = Application.WorksheetFunction _
.SumIf(Range("b39:B47"), "x", Range("c39:C47"))

Cells(47, 6).Value = T

End Sub
Cordialement
G.David
 

Discussions similaires

Statistiques des forums

Discussions
311 710
Messages
2 081 781
Membres
101 817
dernier inscrit
carvajal