ich habe leider ein Problem bei der Umsetzung einer Formel über VBA. Die Formel über Excel ist soweit funktionsfähig, möchte aber die Formel automatisiert in mehreren Zellen einsetzen.
Formel in VBA (erhalte die Meldung "Anwendungs- und objektorientierter Fehler"):
Sheets(cLand.Item(l)).Cells(k, f).Formula = "=ZÄHLENWENNS('report'!$D$2:$D$" & LetzteZeile & ";" & cLand.Item(l) & ";report!$H$2:$H$" & LetzteZeile & ";" & Cells(1, n).Address & ";'report'!$I$2:$I$" & LetzteZeile & ";A$" & m & ";'report'!$Q$2:$Q$" & LetzteZeile & ";""Y"")"
Formel in Excel (funktioniert):
=ZÄHLENWENNS(report!$D$2:$D$34398;"AT";report!$H$2:$H$34398;B$1;report!$I$2:$I$34398;$A2; report!$Q$2:$Q$34398;"Y")
Ich finde nach einige investierten Stunden den Fehler nicht. Hoffe, auf eure Hilfe.
Danke und Grüße,
Dieter