Fonction Somme.Si dans une macro

Je souhaite intégrer une fonction Somme.si dans une macro mais je ne connais
pas la syntaxe à utiliser.

If [sumif(plage1,"A",plage2)] Then......

PS : Je vois pas très bien où tu veux en venir....
AV.

Bonjour Président
Décidément, c'est le jour.....où le Président, I voit rien -))
Serait-ce déjà les brumes du Re Nouveau Beaulolaisien?
Bon pied, bon oeil ?
Bonne journée
Votre Secrétaire
--
Bien amicalmement,
Vivement conseillés:
http://www.excelabo.net
http://jacxl.free.fr/mpfe/trombino.html
http://dj.joss.free.fr/netiquet.htm
http://frederic.sigonneau.free.fr/

Jacquouille.

"AV" <alainPFFFvallon@wanadoo.fr> a écrit dans le message de news:
uo51gwB7FHA.2576@TK2MSFTNGP09.phx.gbl...

Je souhaite intégrer une fonction Somme.si dans une macro mais je ne
connais
pas la syntaxe à utiliser.

If [sumif(plage1,"A",plage2)] Then......

PS : Je vois pas très bien où tu veux en venir....
AV.

Quelques explications s'imposent : j'utilise un fichier très important (11000
lignes et une quinzaine de colonnes).

Certaines données sont importantes, d'autres pas. Je souhaite donc faire le
"tri" avec Somme.Si, et toutes les lignes qui ne répondent pas au critère
seront supprimées...

--
Merci pour vos réponses.

Je souhaite intégrer une fonction Somme.si dans une macro mais je ne connais
pas la syntaxe à utiliser.

If [sumif(plage1,"A",plage2)] Then......

PS : Je vois pas très bien où tu veux en venir....
AV.

Décidément, c'est le jour.....où le Président, I voit rien -))
Serait-ce déjà les brumes du Re Nouveau Beaulolaisien?
Bon pied, bon oeil ?

Nickel !
Par contre quelques questions me laissent autant dubitatif que le "goût
d'airelles framboisées" que j'étais sensé trouver au beaujolpif !

AV

La macro suivante ne fonctionne pas.

Dim Article As Range
Dim Réception As Range

Set Article = Range("A:A")
Set Réception = Range("B:B")

a = Application.WorksheetFunction.CountA(Range("A:A"))
For i = 2 To a
If [sumif(Article,cells(i,1),Réception)] <> 0 Then
Cells(i, 5) = 1
Else
End If
Next i

Où est le problème ???
--
Merci pour vos réponses.

Bonjour Président
Décidément, c'est le jour.....où le Président, I voit rien -))
Serait-ce déjà les brumes du Re Nouveau Beaulolaisien?
Bon pied, bon oeil ?
Bonne journée
Votre Secrétaire
--
Bien amicalmement,
Vivement conseillés:
http://www.excelabo.net
http://jacxl.free.fr/mpfe/trombino.html
http://dj.joss.free.fr/netiquet.htm
http://frederic.sigonneau.free.fr/

Jacquouille.

"AV" <alainPFFFvallon@wanadoo.fr> a écrit dans le message de news:
uo51gwB7FHA.2576@TK2MSFTNGP09.phx.gbl...

Je souhaite intégrer une fonction Somme.si dans une macro mais je ne
connais
pas la syntaxe à utiliser.

If [sumif(plage1,"A",plage2)] Then......

PS : Je vois pas très bien où tu veux en venir....
AV.

Bonjour Yvan
Et si tu disais au Monsieur (le Président) quels sont tes critères de tri?
ex: si A1 > 10 alors supprimer ligne1 ????
Bonne chance

--
Bien amicalmement,
Vivement conseillés:
http://www.excelabo.net
http://jacxl.free.fr/mpfe/trombino.html
http://dj.joss.free.fr/netiquet.htm
http://frederic.sigonneau.free.fr/

Jacquouille.

"Yvan" <Yvan@discussions.microsoft.com> a écrit dans le message de news:
9A8202F7-EBA2-4717-A510-B7CFB2508860@microsoft.com...

Quelques explications s'imposent : j'utilise un fichier très important
(11000
lignes et une quinzaine de colonnes).

Certaines données sont importantes, d'autres pas. Je souhaite donc faire
le
"tri" avec Somme.Si, et toutes les lignes qui ne répondent pas au critère
seront supprimées...

--
Merci pour vos réponses.

Je souhaite intégrer une fonction Somme.si dans une macro mais je ne
connais
pas la syntaxe à utiliser.

If [sumif(plage1,"A",plage2)] Then......

PS : Je vois pas très bien où tu veux en venir....
AV.

Où est le problème ???

Dans la syntaxe...
Comme tu introduis une variable, au lieu de :

If [sumif(Article,cells(i,1),Réception)] <> 0 Then

Ecrire :
If Application.SumIf([Article], Cells(i, 1), [Réception]) <> 0 Then ......

AV

Je m'disais aussi, ce matin , il n'y a personne sur s'forum, plutôt casé du
côté de la Champagne ,je n'ai pas percuté, ... dites donc vous attaquez de
bonne heure le mat au beaujolais!!!

--
Fred


"AV" <alainPFFFvallon@wanadoo.fr> a écrit dans le message de
news:%23MDktJC7FHA.1140@tk2msftngp13.phx.gbl...

Où est le problème ???

Dans la syntaxe...
Comme tu introduis une variable, au lieu de :

If [sumif(Article,cells(i,1),Réception)] <> 0 Then

Ecrire :
If Application.SumIf([Article], Cells(i, 1), [Réception]) <> 0 Then
......

AV