Thema Datum  Von Nutzer Rating
Antwort
27.12.2013 17:14:33 Henry
NotSolved
Blau Excel Zeilen automatisch Löschen
 28.12.2013 04:18:17 Gast73742
Solved
29.12.2013 14:35:25 Henry
NotSolved

Ansicht des Beitrags:
Von:
Gast73742		 Datum:
28.12.2013 04:18:17		 Views:
923		 Rating:
     
Antwort:
 Nein
Thema:
Excel Zeilen automatisch Löschen

Wenn du Zeilen löschst, solltest du von unten die Liste abarbeiten, oder du musst die Indizierung "klüger" handhaben.

Im jetzigen Zustand überspringst du jedesmal eine Zeile nachdem du eine Zeile löschst.

 

Zur Veranschaulichung:

i = 2

Die Suche in Worksheets(2) ergibt Bspw. c = Nothing -> Worksheets(j).Rows(2).Delete(Shift:=xlUp)

i = i + 1 = 3

...

 

Das Problem ist jetzt, dass durch das Löschen der Zeile, alle Zeilen eins nach oben gerutscht sind. Demnach überspringt man hier ungewollt eine zu untersuchende Zeile (hier also erneut Zeile 2). Dieses Problem umgeht man, indem man die Liste von unten nach oben abarbeitet (i läuft also von der letzten Zeile bis Zeile 2 rückwärts). Du musst also auf jedem Arbeitsblatt die letzte Zeile ermitteln (hierzu gibt es tonnenweise Beispiele im Internet zu finden).

Abgesehen davon musst du für jedes Arbeitsblatt die Variable i zurücksetzen, was du derzeit gar nicht machst.

 

LG

 

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
27.12.2013 17:14:33 Henry
NotSolved
Blau Excel Zeilen automatisch Löschen
 28.12.2013 04:18:17 Gast73742
Solved
29.12.2013 14:35:25 Henry
NotSolved