Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 16:22:47
Aktualisierung Verknüpfung bei geschlossener Quelldatei
26.04.2024 16:05:28
PivotChart-Stapeldiagramm erstellen
26.04.2024 15:34:42
Überlagernde Textbox-Ansicht
26.04.2024 15:27:20
Excel öffnet nach Auswahl einer Excel diese leer
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1032to1036
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
1032to1036
1032to1036
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Löschen ab

Löschen ab
12.12.2008 23:47:00
Hardy
Hallo zusammen
Brauche Hilfe gehe mit Worksheets("SUCHEN").Range("A65536").End(xlUp).Offset(1, 0).Select
in die nächste freie Zelle z.B A 65 möchte dann alle Inhalte und Formate aus den nachfolgenden
Spalten/Zellen A B C D E F G H Löschen. Geht das überhaupt?
Kann mir vieleicht Jemand einen Tip geben.
MfG
Hardy

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Ja! Tipp: VBE-Hilfe, Recorder+Archiv benutzen! orT
13.12.2008 03:29:00
Luc:-?
Gruß Luc :-?
AW: Ja! Tipp: VBE-Hilfe, Recorder+Archiv benutzen! orT
13.12.2008 11:46:00
Hardy
Hallo Luc
Hallo Tino
Vielen Dank an euch Beide hat beides geholfen.
Gruß
Hardy
AW: Löschen ab
13.12.2008 10:51:00
Tino
Hallo,
meinst Du der Inhalt dieser kompletten Zeile soll gelöscht werden?
With Worksheets("SUCHEN")
 .Cells(.Rows.Count, "A").End(xlUp).Offset(1, 0).EntireRow.Clear
End With


Gruß Tino

Anzeige
AW: Löschen ab
13.12.2008 11:51:00
Hardy
Hallo Tino
Meinte Spalte A - H
dann ab erste freie zelle alles Löschen
Der Tipp war trozdem Gut
Vielen Dank
Gruß
Hardy
AW: Löschen ab
13.12.2008 12:16:00
Tino
Hallo,
teste mal diese Version.
With Worksheets("Test")
 .Range(.Cells(.Rows.Count, "A").End(xlUp).Offset(1, 0), .Cells(.Rows.Count, "H")).Clear
End With


Gruß Tino

Anzeige
AW: Löschen ab
13.12.2008 12:18:29
Tino
Hallo,
Worksheets("Test")
soll
Worksheets("SUCHEN")
sein!
Gruß Tino
AW: Löschen ab
13.12.2008 16:58:37
Hardy
Hallo Tino
einfach super genau so war es gemeint
vielen Dank
Gruß
Hardy

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige