Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
388to392
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
388to392
388to392
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Zeilen bis zur letzten nichtleeren Zeile kopieren

Zeilen bis zur letzten nichtleeren Zeile kopieren
02.03.2004 13:36:48
Mario
Hallo,
m.H. eines Makros möchte ich in einer Spalte D ab Zeile 38 alle Zeilen bis einschließlich der letzten nichtleeren Zelle in ein neues Tabellenblat kopieren. Weiß jemand dafür eine VBA-Lösung?
Vielen Dank.
Grüße,
Mario

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

Betreff
Datum
Anwender
Anzeige
AW: Zeilen bis zur letzten nichtleeren Zeile kopieren
02.03.2004 13:44:51
Tobias
Hi,
versuchs mal damit

Private Sub ()
'
Dim LZ As Integer
'
Sheets("XXX").Select
Range("D1").Select
LZ = ActiveCell.SpecialCells(xlCellTypeLastCell).Row
Range("D1:D"+Format(LZ,"0")).Select
Selection.Copy
Sheets("XXX2").select
Range("A1").Select
ActiveSheet.Paste
End Sub

AW: Zeilen bis zur letzten nichtleeren Zeile kopieren
02.03.2004 13:53:56
Galenzo
Hallo,
das machst du am besten so:
On Error Resume Next
Sheets("Tabelle1").Range(Cells(38, 4), Cells(Rows.Count, 4).End(xlUp)).Copy Sheets("Tabelle2").Range("A1")

Viel Erfolg!
AW: Zeilen bis zur letzten nichtleeren Zeile kopieren
02.03.2004 14:01:03
Mario
Hallo Galenzo,
bei dieser Lösung wird das Kopierte nicht eingefügt.
Woran kann das liegen?
Gruß
Mario
Anzeige
AW: Zeilen bis zur letzten nichtleeren Zeile kopieren
02.03.2004 14:04:59
Galenzo
Beachte: 2 Vorraussetzungen:
1. du hast auch eine "Ziel"tabelle namens "Tabelle2"
2. die letzte volle Zelle in Spalte D liegt UNTER Zeile 38
mfg
AW: Zeilen bis zur letzten nichtleeren Zeile kopieren
02.03.2004 13:59:42
Mario
Vielen Dank,
es funktioniert!!
Grüße,
Mario

333 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige