Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
724to728
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
724to728
724to728
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

null-zellen loeschen

null-zellen loeschen
03.02.2006 14:59:24
Reno
Hallo Leute,
bitte entschuldigt...diese frage habt ihr bestimmt schon sich mal beantwortet...ich hatte auch im archiv gesucht aber leider nichts gefunden.
Ich habe folgende beispieltabelle:
https://www.herber.de/bbs/user/30629.xls
jetzt wollte ich mit einem klick alle Kunden mit null EUR Umsatz elimieren.
ich denke das ein makro hier angebracht waere, welches ich aber leider nicht erstellen kann.
die problematik ist das die tabelle regelmaessig aktualisiert wird und sich somit der zellbezug vergroessern bzw verkleinern koennte. Besteht die moeglichkeit excel zu sagen das er in den spalten B und C schauen soll, ober er in Spalte C eine Null findet um die gesamte Zeile beim Vorfinden dann zu loeschen?
Vielen Dank im Voraus & gruss
Reno

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: null-zellen loeschen
03.02.2006 15:23:04
Matthias
Hallo Reno,
ins Tabellenblattmodul:

Private Sub CommandButton1_Click()
Const sp = 3
Const zMin = 4
Dim i As Long, zMax As Long
zMax = Cells(Rows.Count, sp).End(xlUp).Row
For i = zMax To zMin Step -1
With Cells(i, sp)
If .HasFormula = False And .Value = 0 And .Text <> "" Then
.EntireRow.Delete Shift:=xlUp
End If
End With
Next i
End Sub

Gruß Matthias
AW: null-zellen loeschen
03.02.2006 16:02:12
Reno
Vielen Dank Matthias!
Es funktioniert!
Dir ein schoenes Wochenende!
Gruss, Reno
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige