Naja ich hab es jetzt anders gelöst.
So funktioniert es, danke für die Hilfe ;)
Sub Zusammenfassen()
Dim Zeile1&, Zeile2&, Zeile3&, letzteZ&
'Prüfen ob Tabellenblatt 'Zusammenfassung' vorhanden ist'
If MsgBox("Wurde das Makro schon einmal ausgeführt?", vbYesNo) = vbYes Then...