Ich benutze Excel 2003 SP1, und bei folgenden Code stürzt Excel vollkommen ab:
.InsertLines 3, "Private Sub Worksheet_Change(ByVal Target As Range)"
.InsertLines 4, "Anzahl_KZ = Ermitteln_lZeile(" & Chr(34) & "tname" & Chr(34) & ", 1)"
...
Ich erzeuge eine neue Datei, die ich mit einem Makro versehen will, dass bei Änderungen im Tabellenblatt "tname" die Formatierung wieder neu aufbaut (rot/grün für Über- und Unterschreitungen in einem Pivottabellenbericht).
Vielen Dank für Eure Hilfe