Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 23:47:55
Datum ausweisen, wenn definierte Summe erreicht ist
25.04.2024 21:40:53
Excel Datenquelle aus dem Web mit Anmeldung?
25.04.2024 21:21:16
Zellkommentar in UserForm anzeigen und bearbeiten
25.04.2024 21:13:13
Kalenderwochen addieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
448to452
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
448to452
448to452
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

zeilen nach wert durchsuchen, ansonsten löschen

zeilen nach wert durchsuchen, ansonsten löschen
05.07.2004 18:37:02
haensen
Hallo,
ich hab ein kleines Problem und zwar möchte ich in meiner Excel Datei jede Zeile nach verschiedenen Werten in Spalte C durchsuchen und wenn keiner der Werte vorhanden ist soll die gesamte zeile gelöscht werden, damit ich zum schluss nur die gewünschten Zeilen mit bestimmten werten übrig habe.
Danke

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: zeilen nach wert durchsuchen, ansonsten löschen
Beni
Hallo haensen,
Gruss Beni

Sub Werte_suchen()
Dim Wert As Variant
Titel = "InputBox"
Mldg = "Wert eingeben"
Wert = InputBox(Mldg, Titel)
For i = Cells(Rows.Count, 3).End(xlUp).Row To 1 Step -1
If Not Cells(i, 3).Text = Wert Then Cells(i, 3).Delete Shift:=xlUp
Next i
End Sub

AW: zeilen nach wert durchsuchen, ansonsten löschen
Udo
If Not Cells(i, 3).Text = Wert Then Rows(i).Delete
Udo
AW: zeilen nach wert durchsuchen, ansonsten löschen
Boris
Hi,
einfacher:
Autofilter über die fragliche Spalte C, filtern nach 'Entspricht nicht', die gefilterten Zeilen anschließend markieren und manuell löschen.
Grüße Boris
AW: zeilen nach wert durchsuchen, ansonsten lösche
ChrisL
Hi
oder so...

Sub ZeilenVergleichenLoeschen()
Dim WS1 As Worksheet, WS2 As Worksheet
Dim iZeile As Long
Set WS1 = Worksheets("Tabelle1")
Set WS2 = Worksheets("Hilfsblatt")
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual
For iZeile = WS1.Range("C65536").End(xlUp).Row To 1 Step -1
If WorksheetFunction.CountIf(WS2.Range("A1:A" & WS2.Range("A65536").End(xlUp).Row), WS1.Cells(iZeile, 3)) = 0 Then WS1.Rows(iZeile).Delete
Next iZeile
Application.ScreenUpdating = True
Application.Calculation = xlCalculationAutomatic
End Sub

Hinterlege die Werte in ein "Hilfsblatt" Spalte A. Alles andere wird gelöscht.
Gruss
Chris
Anzeige
AW: zeilen nach wert durchsuchen, ansonsten lösche
06.07.2004 10:33:22
haensen
Danke ChrisL,
genau das habe ich gesucht. Danke an alle.

303 Forumthreads zu ähnlichen Themen

Tabelle nach Anzahl sortieren
Pascal

Hallo,
wie kann ich eine Tablle nach der Anzahl der Wörter in einer Spalte sortieren?
Die Tabelle sieht etwa so aus:
Spalte1 | Spalte2 | Spalte 3
1 | der die | ...
2 | der | ...
3 | der die das | ...
und aussehen soll...
25.09.2008 11:50:39
Thread-ID: 1012284
6 Beiträge
Anzeige
Zeilen einfügen nach Wertwechsel
Marcus

Hallo,
benötige folgende Hilfe bei EXCEL/VBA:
eine Zeile soll eingefügt werden, wenn der Wert in Spalte B "1" ist.
Die Zeile soll vor der Zelle/Zeile mit dem Wert eingefügt werden.
Danke für die Hilfe
Marcus Leu
30.10.2008 11:31:00
Thread-ID: 1020544
13 Beiträge
Artikelzeilen nach Wert "Anzahl" anzeigen
Helmut

Guten Tag!
Ich habe folgendes Problem:
In einer Tabelle (A) stehen in Spalte 1 die Artikelbezeichnung [ArtNr] und in Spalte 2 die gelieferte Stückzahl [Stk]. Ich möchte jetzt in einer neuen Tabelle (B) die Artikelnummer sooft untereinander stehen haben, wie in der Spalte [Stk] angegeben...
18.03.2009 15:11:35
Thread-ID: 1061455
4 Beiträge
Anzeige
Falsche Bildgröße nach dem Sortieren?
Kasimir

Hallo an alle!
Ich habe da ein Problem. Ich habe eine Datei, in der in einigen Zellen in Spalte I Grafiken eingebunden sind. In anderen Zellen ebenfalls in Spalte I steht nur Text. Die Zeilen haben alle unterschiedliche Höhen. Die mit Grafik sind höher, die mit nur Text sind nicht so hoch....
23.06.2009 21:33:24
Thread-ID: 1083760
2 Beiträge
Kopierte Werte nach Datum (aus)sortieren
Sirenia

Einen wunderschönen guten Morgen miteinander,
ich stehe vor folgendem Problem:
Ich kopiere Werte aus den Sheets M1-M4 mit diesem Code in die erste freie Reihe eines jeden Sheets (Werte aus Reihe 7 in M1 werden in die erste freie Reihe von M1 geschrieben, usw.).
Private Sub CommandBu...
13.07.2009 12:19:47
Thread-ID: 1088133
17 Beiträge
Zahlen bei klick in nächste spalte übertrage
Didi

Hallo Leuete,
ich brauche euere Hilfe.!
folgende Situation möchte ich einwenig beschleunigen:
Gibt es zwei Tabellenbereiche, gleich aufgebaut.
Tabellen Bereich -Ausgang (C5:C36) - wird täglich muttiert, dort gebe ich jeden Tag ausgangszahlen ein.
In Tabellen Bereich -Statist...
05.09.2009 09:31:28
Thread-ID: 1100743
3 Beiträge
Spalte nach Datum sortieren per Makro
Larissa

Hallo,
ich möchte mit einem Makro eine Tabelle nach Datum in Spalte G sortieren.
Wenn ich das Makro aufzeichne, fragt er mich nach: Alles was wie eine Zahl aussieht....
Dann funktioniert die Sortierung, aber nicht, wenn ich die Aufzeichnung abspiele.
Weiß jemand, woran das liege...
15.10.2009 11:09:27
Thread-ID: 1109788
5 Beiträge
Spalte nach Nummer sortieren
Micha*
Bereich markieren (alle Spalten)
Daten
Sortieren
Spalte wählen
fertig
16.04.2002 09:34:17
Thread-ID: 113611
4 Beiträge
Anzeige

Links zu Excel-Dialogen

InputBox

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
5
14
12
3
9
1
16
2
4
3
1
2
2
4
3
1
1
6
3
6
4
15
2
7
5