HERBERS
Excel-Forum
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Entdecke rund 2 Millionen Excel-Lösungen im
Forumsarchiv
Forumbeitrag
Excel-Version des Fragestellers:
2022
Erfahrungslevel des Fragestellers:
VBA nur mit Recorder
daniel
29.04.2026 22:21:02
AW: Zeilen löschen verhindern ohne Blattschutz
tja, ist jetzt schwer zu sagen, was du falsch gemacht hast, wenn du uns nichts zeigt, was du gemacht hast.
also bitte Code posten oder noch besser, die Datei hochladen.
Dann können wir draufschauen, wo dein Fehler liegt.

die Frage ist, wo ist denn wichtig, dass der Bezug nicht verloren geht?
hast du bezüge auf die Zeile drüber oder darunter, also in A2 den Bezug auf A1?
dann könntest du auch das =A1 durch =Index(A:A;Zeile()-1) ersetzen.
wenn du so eine Zeile löschst, dann referenziert die Formel automatisch auf die neue darüber liegende Zeile und der Bezug geht nicht verloren (außer bei der Zeile 1, aber das ist ja auch nicht anders zu erwarten)

Gruß Daniel
Als Antwort auf diesen Beitrag
Ringberger
29.04.2026 20:46:16
AW: Zeilen löschen verhindern ohne Blattschutz
Hallo,

danke noch einmal für die Mühe. Aber es funktioniert leider nicht. Beim Versuch eine Zeile zu löschen, wird in der zweiten Zeile des Codes "urrc" blau markiert und es erscheint die Meldung: "Fehler beim Kompilieren: Variable nicht definiert". In der vorhergehenden Version war noch als zweite Zeile die Zeile "urrc = Me.UsedRange.Rows.Count" vorhanden. Auch damit erhalte ich die selbe Meldung. In jedem Fall ist die zu schützende Zeile dann doch gelöscht. Der Bezug zu den folgenden Zeilen ist dann auch nicht mehr gegeben.
Vielleicht gibt es ja doch noch eine Lösung.

Danke

Andreas
Folgenachrichten
Antwort auf Beitrag erstellen
Bitte einen Anwendernamen ohne @ eingeben.
Bitte das Passwort eingeben.
Bitte eine gültige E-Mail-Adresse eingeben.
Bitte einen Betreff eingeben.
Weitere Optionen
Aktivieren, wenn die Frage/der Beitrag noch nicht beantwortet wurde und unter Listen > Offene Threads erscheinen soll.
Beispieldatei hochladen

Bitte einen Nachrichtentext eingeben.