Tach,
ich lese schon seit einiger Zeit immer wieder Lösungen zu meinem Problem in diesem Forum und wollte mich erst einmal bei allen Autoren dieser Lösungen pauschal bedanken!!!
Jetzt habe ich aber ein Problem, wo ich keine Lösung finden konnte.
Ich möchte in einem Tabellenblatt "Blatt2" eine Formel mit VBA eintragen. Die Formel bezieht sich auf das Tabellenblatt " Blatt1". Die Formel ist eine Matrixformel und lautet:
= Summe(('Blatt1'!22:22)="Suchbegriff"*('Blatt2'!33:33))
für die Zelle D:12 in "Blatt2"
Diese möchte ich gerne in die Zellen D12:D35166 in "Blatt2" eintragen.
Mit dem folgenden Code:
For i = 1 To 10
Zeile = 30 + i & ":" & 30 + i
Range(Cells(12 + i, 4), Cells(12 + i, 4)).FormulaArray = "=SUM(('Einspeisung " & Name & "'!22:22=""Einspeisung vorgelagertes Netz"")*('Einspeisung " & Name & "'!" & Zeile & "))"
Next i
Kann ich die Formel auch korrekt in den Zellen D13:D23 eintragen. Dies klappt auch noch bei Hundert Zellen, sobald ich aber das ganze auf die 35.000+ Zellen mache stürzt Excel ab.
Ich hatte am Anfang gehofft die Formel ohne Schleife verwenden zu können, da ja auch die Formel
Range(Cells(13, 7), Cells(35166, 7)).Formula = "=Sum(D13:F13)"
immer korrekt als relativer Bezug funktioniert. Scheint aber bei unterschiedlichen Blättern nicht zu funktionieren oder es liegt an der "Stückelung" der Formel
Gibt es eine Möglichkeit dies Problem elegant zu lösen?
Vielen Dank schon mal für alle Ideen
Bis denn
Christoph