Laufzeitfehler
06.07.2016 11:10:56
DeB
Hallo, mein erster Beitrag in Form einer Frage.
Der Laufzeitfehler 1004 (Anwendungs- oder objektdefinierter Fehler) tritt bei dem Versuch die Datei zu öffnen auf.
Das Tabellenblatt P_Tab_WZ: Spalten A bis F sind Werte über Pivottabelle generiert. Spalten G bis M enthalten weiterführende Berechnungen.
In letzter Zeile Spalte G bis M werden Summen gebildet. Das funktioniert soweit, aber erst wenn ich die Fehlermeldung manuell beende.
Meine Frage wäre, ob es an dieser Schleife liegt?
For iCZähler = 7 To 13
Worksheets("P_Tab_WZ").Cells(lngLRowPTabWZ, iCZähler) = WorksheetFunction.Sum(Worksheets("P_Tab_WZ").Range(Cells(7, iCZähler), Cells(lngLRowPTabWZ - 1, iCZähler)))
Next iCZähler
Herzlichen Dank vorab!