Thema Datum  Von Nutzer Rating
Antwort
Rot If-then-Do-while-Schleife
 12.10.2006 11:10:36 Susi
NotSolved
12.10.2006 13:21:56 Rasta
NotSolved
12.10.2006 13:54:06 Susi
NotSolved
15.10.2006 03:21:31 Rasta
NotSolved

Ansicht des Beitrags:
Von:
Susi		 Datum:
12.10.2006 11:10:36		 Views:
2037		 Rating:
     
Antwort:
  Ja
Thema:
If-then-Do-while-Schleife
Hallo ihr Lieben,

ich will eine Schleife bauen, die mir in meinem Tabellenblatt in Spalte H nach der Zeichenfolge "ABC" sucht und alle darunterliegenden Zeilen löscht, bis wieder eine beschriebene Spalte H kommt.
Als ersten Wurf hab ich mal sowas gemacht. Macht das Sinn???

Vielen Dank für Eure Antworten!



Sub Suchen_löschen()
Dim i As Long

For i = Cells(Rows.Count, 8).End(xlUp).Row To 1 Step -1
If Cells(i, 8) = "ABC" Then
Do
Rows(i).Delete
While Range("H1:h200").SpecialCells(xlCellTypeBlanks) = True
End If
Next i
End Sub

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 If-then-Do-while-Schleife
 12.10.2006 11:10:36 Susi
NotSolved
12.10.2006 13:21:56 Rasta
NotSolved
12.10.2006 13:54:06 Susi
NotSolved
15.10.2006 03:21:31 Rasta
NotSolved