Office: (Office 2013) SummenProdukt per vba benutzen

Hallo,
ich würde gerne per VBA in eine Zelle eine Formel mit Summenprodukt schreiben.

Das ist jetzt nur testweise, wenn in Spalte A "x" steht dann soll er die Werte in B Addieren.

Sub test()
Cells(3, 3).Formula = "=SUMMENPRODUKT((A:A=""x"")*(B:B))"
End Sub

Er schreibt mir zwar in die Zelle die korrekt Formel =Summenprodukt((A:A="x")*(B:B)) aber als Ergebnis bekomm ich #NAME?.
Wenn ich die gleiche Formel per Hand in die Zelle eintrage rechnet er mir alles korrekt aus, woran liegt das?

Grüße

 

Hallo,

das liegt daran, dass Formula eine englische Formel erwartet. Für eine deutsche Formel musst Du FormulaLocal verwenden,
also z.B. Cells(3, 3).FormulaLocal = ...

Gruß

 

ok danke jetzt klappts. Was müsste ich schreiben wenn ich eine englische Formel verwenden will?
Cells(3, 3).Formula = "=Productsum((A:A=""x"")*(B:B))" funktioniert nicht

 

Hallo,

der englische Funktionsname für SUMMENPRODUKT ist SUMPRODUCT. Eine Referenz inkl. Übersetzer findest Du hier http://de.excel-translator.de/

Gruß

 

vielen dank. eine letzte frage hab ich noch. um probleme mit leerstrings in Spalte B zu vermeiden musst ich die Formel leicht umschreiben.
habe wieder das gleiche problem, dass wenn ich versuch diese formel per vba reinzuschreiben er mir ne Fehler ausspruckt.
diesmal anwendungs- oder objektorientierter Fehler.

in der zelle soll stehen =Summenprodukt((A:A=""x"")*(Istzahl(B:B));(B:B))

Sub test()
Cells(3, 3).Formula = "=Sumproduct((A:A=""x"")*(IsNumber(B:B));(B:B))"
End Sub

ich habe die vermutung dass es an dem 2. array ;(B:B) liegt, aber konnte nirgendwo finden wie ich es korrigiere. kann jemand helfen?

 

Hallo,

das Trennzeichen für Argumente in einer englischen Formel ist ein Komma und kein Strichpunkt.

Gruß

 

perfekt danke. jetzt funktioniert alles!