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

nach letzter Zeile einfügen

nach letzter Zeile einfügen
14.07.2005 09:17:40
Christoph
Hallo Leute,
ich habe ein Problem und zwar möchte ich aus der Tabelle2 den Bereich A4:H100 kopieren und in der Tabelle Ausfälle ab der letzten Zeile einfügen.
Wenn also in Tabelle Ausfälle die letzte Zeile die 140 ist, sollen die Sachen ab 141 eingefügt werden.
Habt ihr eine Idee, wie ich sowas machen kann.
Gruß
Christoph

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

Betreff
Datum
Anwender
Anzeige
AW: nach letzter Zeile einfügen
14.07.2005 09:21:07
Dr.
Hi, ungetestet:

Sub test()
letztezeile = sheets(2).cells(65536,1).end(xlup).row
sheets(1).range("a4:a100").copy destination:= sheets(2).Cells(letztezeile+1,1)
End Sub

AW: nach letzter Zeile einfügen
14.07.2005 09:27:32
Christoph
Haut leider net hin, er gibt mir in den Zellen immer nur eine 0 aus
AW: nach letzter Zeile einfügen
14.07.2005 09:38:59
Dr.
Der Code funzt einwandfrei, habs grad getestet.
Du musst die Tabellenbezeichnungen natürlich entsprechend anpassen. Momentan wird von Tabelle 1 (A4:A100) in Tabelle 2, Spalte 1 kopiert.
Anzeige

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige