Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: bestimmte Zeilen löschen

bestimmte Zeilen löschen
05.11.2012 12:22:53
Brüderlein
Hallo liebe Excel-Freunde,
habe ein sicherlich kleines Problemechen für
unsere Makro Spezialisten.
Wer kann mir dabei helfen, in einer Spalte markierten
Sätze automatisiert zu löschen?
Für Eure Hilfe besten Dank im Voraus.
Viele Grüße
Lorenz
https://www.herber.de/bbs/user/82483.htm

Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: bestimmte Zeilen löschen
05.11.2012 13:08:25
Matze,Matthias
Teste das mal:
Option Explicit
Sub weg()
Dim Zelle As Range
Dim Bereich As Range
Dim Loletzte As Long
Loletzte = Cells(Rows.Count, 2).End(xlUp).Row  'SpalteB
Set Bereich = Range("B2:B" & Loletzte)
Application.ScreenUpdating = False
For Each Zelle In Bereich
If Zelle = "gelöscht" Then
Zelle.Rows.Delete
End If
Next Zelle
Application.ScreenUpdating = True
End Sub
Matze so bin wech,...

Anzeige
AW: bestimmte Zeilen löschen
05.11.2012 14:15:01
Brüderlein
Hallo Matze,
vielen Dank für Deine rasche Hilfe. Leider komme ich mit
Deinem Script nicht ganz zu recht! Könntest Du das bitte
nochmal überprüfen? Vielen Dank vorab.

AW: bestimmte Zeilen löschen
05.11.2012 15:05:59
Rudi
Hallo,
Zeilen muss man immer von unten löschen.
Sub weg()
Dim i As Long
Dim Loletzte As Long
Loletzte = Cells(Rows.Count, 2).End(xlUp).Row  'SpalteB
Application.ScreenUpdating = False
For i = Loletzte To 1 Step -1
If Cells(i, 2) = "gelöscht" Then
Rows(i).Delete
End If
Next i
Application.ScreenUpdating = True
End Sub

Anzeige
AW: bestimmte Zeilen löschen
08.11.2012 17:27:19
Brüderlein
Hallo Rudi,
vielen Dank für die Hilfe. Bin klar gekommen!
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige