Thema Datum  Von Nutzer Rating
Antwort
17.04.2023 17:33:05 Lokimo
NotSolved
17.04.2023 18:06:23 Der Steuerfuzzi
NotSolved
17.04.2023 19:10:10 xlKing
NotSolved
18.04.2023 10:10:46 Der Steuerfuzzi
NotSolved
18.04.2023 22:53:17 xlKing
NotSolved
Blau Befehl durch nicht angrenzende Range laufen lassen
24.04.2023 17:07:44 Lokimo
NotSolved
24.04.2023 19:21:26 xlKing
NotSolved

Ansicht des Beitrags:
Von:
Lokimo
Datum:
24.04.2023 17:07:44
Views:
459
Rating: Antwort:
  Ja
Thema:
Befehl durch nicht angrenzende Range laufen lassen

Hallo X1King

Das mit der Areas-Eifenschaft hat soweit funktioniert. Entschuldigt die mangelhafte Problembeschreibung.

For Each ar In Selection.Areas
  For Each rw In ar.Rows
            
       rw.EntireRow.Delete

Nächste:
  Next rw
Next ar

Grundsätzlich möchte ich jede angewählte Zeile einzeln löschen. Einzeln, da auf einem anderen Arbeitsblatt eine zugehörige Referenzspalte gelöscht werden muss bevor die nächste Zeile gelöscht wird. Das funktioniert tiptop wenn man die Zellen einzeln anwählt mit ctrl. Wenn ich aber mit dem Cursor mehrere Zellen auf einmal anwähle begreift er nicht dass eine Zeile gelöscht wurde und überspringt somit immer eine Zeile. Wenn einzeln angewählt merkt er dass die Zelladresse geändert hat, respektive die Zeile durch das löschen einer anderen Zeile eins nach oben gerutscht ist.

Mit For each next klappts mit dem Zeilen löschen gar nicht. Ohne das löschen würde aber auch das gehen.

 


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
17.04.2023 17:33:05 Lokimo
NotSolved
17.04.2023 18:06:23 Der Steuerfuzzi
NotSolved
17.04.2023 19:10:10 xlKing
NotSolved
18.04.2023 10:10:46 Der Steuerfuzzi
NotSolved
18.04.2023 22:53:17 xlKing
NotSolved
Blau Befehl durch nicht angrenzende Range laufen lassen
24.04.2023 17:07:44 Lokimo
NotSolved
24.04.2023 19:21:26 xlKing
NotSolved