Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
652to656
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
652to656
652to656
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

in letzter Zeile einzelne Zellen löschen

in letzter Zeile einzelne Zellen löschen
13.08.2005 17:58:39
Korl
Hallo,
ich möchte in der letzten Zeilen, Spalte B einzelene Zellen löschen.
Dafür habe ich es mit folgenden Code versucht:

Sub letzteZeile_löschen()
ActiveSheet.Range("B1000:G1000", "J1000:Q1000").End(xlUp).ClearContents
Range("B1000").End(xlUp).Select
End Sub

Leider wird immer nur die letzte Zelle in Spalte "B" gelöscht.
Kann mir hier bitte jemand helfen?
Gruß Korl

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: in letzter Zeile einzelne Zellen löschen
13.08.2005 18:19:43
Ramses
Hallo
probiers mal so

Sub letzteZeile_löschen()
dim lR as long
lr = Range("B65536").End(xlup).row
ActiveSheet.Range("B" & lr & ":G" & lr, "J" & lr & ":Q" & lr).ClearContents
Range("B" & lr).Select
End Sub

Gruss Rainer
AW: in letzter Zeile einzelne Zellen löschen
13.08.2005 18:49:14
Korl
Hallo Rainer,
Danke für Deine Mühe.
Grundsätzlich läuft Dein Code, nur löscht er mir in Spalte "H & I" ebenfalls die Zellen, was nicht sein soll.
Die Spalten "D & E" sind ausgeblendet, hat es damit was zu tun?
Gruß Korl
AW: in letzter Zeile einzelne Zellen löschen
13.08.2005 21:01:12
Korl
Hallo Rainer,
ich habe einiges probiert und bin zur folgend Lösung gekommen:

Sub letzteZeile_löschen()
Dim lR As Long
lR = Range("B65536").End(xlUp).Row
ActiveSheet.Range("B" & lR, "G" & lR).ClearContents
ActiveSheet.Range("J" & lR, "Q" & lR).ClearContents
Range("B" & lR).Select
End Sub

Gruß Korl
Anzeige

304 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige