Guten Tag an die Fachleute. Ich möchte u. a. Code so einrichten, das die nach meinem Wissen starre Eingrenzung der Spalte und Nummer von - bis nur ein richtiges Ergebnis in meinem Beispiel ergibt. Frage: kann man die ausgefüllten Zeilen nicht automatisch ermitteln lassen, so das das richtige Ergebnis aus Summenprodukt errechnet wird. Die Anzahl Zeilen verändert sich, und man muß ständig den Code händisch aktualisieren, was sehr lästig ist.
Ich lese immer was von letzter Zeile ermitteln, aber ich muss doch den Zeilenumfang genau difinieren?
Kann mir da vielleicht jemand weiter helfen? Bin hier etwas ratlos. Gruß Josef
Ich lese immer was von letzter Zeile ermitteln, aber ich muss doch den Zeilenumfang genau difinieren?
Kann mir da vielleicht jemand weiter helfen? Bin hier etwas ratlos. Gruß Josef
Code:
letztezeile = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row
MsgBox letztezeile
Worksheets("TabStat").Range("b2").FormulaLocal = "=SUMMENPRODUKT(((ArbTab!$C$2:$C$20=""Herr"")+(ArbTab!$C$2:$C$20=""Frau""))/ZÄHLENWENN(ArbTab!$B$2:$B$20;ArbTab!$B$2:$B$20))"
Worksheets("TabStat").Range("b2").Copy
Worksheets("TabStat").Range("b2").PasteSpecial xlValues
Zuletzt bearbeitet: