WorksheetFunction.SumIf

[Spiderman]

Hoi allemaal,

Is het mogelijk om met een WorksheetFunction.SumIf meerdere criteria op te geven

Dus bijvoorbeeld WorksheetFunction.SumIf(Range(A1:B10), =waarde in column1 AND waarde in column2", Range(C1:C10))

Bij voorbaat dank
Arno

 

[Wigi]

Arno,

Neen. Net zoals dat dat in de "gewone" Excel variant niet gaat.

Werk daarom met een SOMPRODUCT functie, of een Autofilter (waarna je de gefilterde records optelt).

Wigi

 

[Spiderman]

Hoi Wigi,

Bedank voor je antwoordt.

Ik heb het op een andere manier opgelost, door de Range waarin gezocht moet worden te beperken d.m.v. de juiste sorteer volgorde. Hierdoor kon ik bijvoorbeeld i.p.v. Range("A:A") de Range("A50:A75") gebruiken.

De autofilter functie vindt ik niet echt fijn (tenminste met mijn beperkte kennis). Ik kon namelijk geen manier vinden om te kijken of de autofilter aan staat of juist uit. Dus als de gebruiker zelf als de autofilter aan zet en daarna mijn Macro start loopt de boel in de soep.

 

[Wigi]

Dit test of de Aufofilter aan staat:

If Worksheets("Blad1").AutoFilterMode Then
'...
End If

Misschien is dit nuttig.

Wigi

 

[Wigi]

Oh ja, nog vergeten zeggen: de Autofilter aan zetten als hij uit staat, en uit zetten als hij aan staat, doe je met:

Worksheets("Blad1").AutoFilterMode = Not(Worksheets("Blad1").AutoFilterMode)

Wigi