Thema Datum  Von Nutzer Rating
Antwort
Rot EntireRow.Delete Bug - woher kommt er?
 19.02.2018 09:12:21 Vitali H.
NotSolved
19.02.2018 09:34:20 Gast84804
*****
Solved
19.02.2018 10:53:08 Vitali H.
NotSolved
19.02.2018 11:30:57 Gast84804
*****
NotSolved
21.02.2018 13:34:08 Vitali H.
NotSolved
20.02.2018 08:19:45 RPP63
*****
NotSolved
20.02.2018 20:03:44 Gast84804
NotSolved
21.02.2018 13:37:53 Gast98085
NotSolved

Ansicht des Beitrags:
Von:
Vitali H.		 Datum:
19.02.2018 09:12:21		 Views:
703		 Rating:
     
Antwort:
  Ja
Thema:
EntireRow.Delete Bug - woher kommt er?

Hallo VBA-Freunde,

ich bin neu bei VBA und habe für meine aktuelle Tätigkeit einen Code geschrieben, der leere Zeilen löschen soll:

Sub deletion_of_empty_rows()
 
Dim i As Integer
 
For i = 1 To 500
    If Cells(i, 2).Value = vbNullString Then
        Rows(i).EntireRow.Delete
    End If
Next i
 
End Sub

Leider gibt es aber einen Bug. Der löscht immer nur die Hälfte der leeren Zeilen, sodass ich diesen meherfach laufen lassen muss, um den gewünschten Effekt zu erzielen. Meiner Meinung nach sollte der Code eigentlich alle leeren Zeilen löschen. Könnt ihr mir helfen herauszufinden, wo der Fehler liegt?

Vielen Dank im Voraus

LG

Vitali

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
Rot EntireRow.Delete Bug - woher kommt er?
 19.02.2018 09:12:21 Vitali H.
NotSolved
19.02.2018 09:34:20 Gast84804
*****
Solved
19.02.2018 10:53:08 Vitali H.
NotSolved
19.02.2018 11:30:57 Gast84804
*****
NotSolved
21.02.2018 13:34:08 Vitali H.
NotSolved
20.02.2018 08:19:45 RPP63
*****
NotSolved
20.02.2018 20:03:44 Gast84804
NotSolved
21.02.2018 13:37:53 Gast98085
NotSolved