Zeilen unter dem letzten Wert in Spale C löschen

Forumthread: Zeilen unter dem letzten Wert in Spale C löschen
5 Beiträge zu diesem Forumthread
Anzeige
305 Threads zu ähnlichen Themen
VBA Beispiele zu verwandten Themen

Top 100 Forumthreads

21.07.2004 19:13:12

Milan

Hallo Leute,
Folgende Aufgabenstellung:
Ich habe in den Spalten A bis G unterschiedliche Werte und Zeichen.
Keine Überschrift
In Spalte C befinden sich nur Zahlen, der kleinste Wert ist 1
Anzahl Zeilen ist immer unterschiedlich
Wenn aber in Spalte B die Zahlenreihe zu Ende ist,
dann alle Zeilen darunter löschen
Oder noch einfacher:
Wenn in Spalte C der Wert kleiner ist als 1 dann alle Zeilen
darunter löschen (oder nur den Inhalt)
Danke im voraus für eure Mühen.
Gruß
Milan

5
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Zeilen unter dem letzten Wert in Spale C lösch

reinhard
Cells(letzteC, 3) ändern in Cells(letzteC, 9) owT

Reinhard
AW: Zeilen unter dem letzten Wert in Spale C lösch

Bei
AW: Zeilen unter dem letzten Wert in Spale C lösch

Reinhard
AW: Zeilen unter dem letzten Wert in Spale C lösch

Milan

AW: Zeilen unter dem letzten Wert in Spale C lösch

reinhard

Hi Milan,


Sub loesch()
Dim letzteC As Long
Dim letzteB As Long
letzteB = Range("B65536").End(xlUp).Row
letzteC = Range("C65536").End(xlUp).Row
Range(Cells(letzeB + 1, 1), Cells(letzteC, 3)).ClearContents
End Sub

Gruß
Reinhard

Cells(letzteC, 3) ändern in Cells(letzteC, 9) owT

Reinhard

AW: Zeilen unter dem letzten Wert in Spale C lösch

Bei

Hallo Reinhard,
bei mir hat sich ein Schreibfehler eingeschlichen!
Die Abfrage bezieht sich netürlich auf "C" das "B" war falsch.
Folgende Aufgabenstellung:
Ich habe in den Spalten A bis G unterschiedliche Werte und Zeichen.
Keine Überschrift
In Spalte C befinden sich nur Zahlen, der kleinste Wert ist 1
Anzahl Zeilen ist immer unterschiedlich
Wenn aber in Spalte (C) die Zahlenreihe zu Ende ist,
dann alle Zeilen darunter löschen
Oder noch einfacher:
Wenn in Spalte C der Wert kleiner ist als 1 dann alle Zeilen
darunter löschen (oder nur den Inhalt)

AW: Zeilen unter dem letzten Wert in Spale C lösch

Reinhard

Hallo Milan,
"In Spalte C befinden sich nur Zahlen, der kleinste Wert ist 1", okay, kapiert, dann kommt
"Wenn in Spalte C der Wert kleiner ist als 1 dann alle Zeilen" ?
und das nachfolgende
"Wenn aber in Spalte (C) die Zahlenreihe zu Ende ist,"
sprengt meine Kwerdenkerfähigkeiten *g
Gruß
Reinhard

AW: Zeilen unter dem letzten Wert in Spale C lösch

Milan

Hallo Reinhard,
ich versuche es mal anders,
in den Spalten A bis G befinden sich Zahlen und Zeichen.
In Spalte C befinden sich aber nur Zahlen.
Anzahl Zeilen ist immer unterschiedlich.
(z.B. von a1 bis A5000 steht Buchstabe "X",
in B1 bis B4000 steht Buchstabe "Y"
in C1 bis C100 stehen Zahlen.
Und jetzt alle Zeilen ab Zeile 101 bis 65000 löschen.
So gesehen ist es egal was in den anderen Spalten steht,
wenn in Spalte C die unterste (oder letzte) Zahl erreicht ist,
dann alle Zeilen darunter löschen, in allen Spalten.
Ich hoffe das ich es jetzt besser darstellen konnte.
Gruss
Milan