Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Eintrag in nächste freie Zeile

Eintrag in nächste freie Zeile
30.01.2007 15:14:07
Patrick
Hallo,
Kannst mir vielleicht jemand bei folgendem Problem helfen:
Ich möchte das der Bereich G29:K29 aus dem Arbeitsblatt Eingabe aus dem Workbook Test1.xls in die nächste leere Zeile in das Workbook Test2.xls in das Arbeitsblatt Tabelle1 eingefügt wird, wobei in der 1. Zelle (Spalte A) immer schon ein Eintrag vorhanden ist. Also G28:K29 nach Spalte B bis F nächste leere Zeile.
Vorab bereits tausend Dank.
Gruß
Patrick
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Eintrag in nächste freie Zeile
30.01.2007 17:22:46
fcs
Hallo Patrick,
hier ein Beispiel, Datei- und Tabellennamen ggf. Anpassen
Gruss
Franz

Sub Bereichuebertragen()
Dim wb1 As Workbook, wb2 As Workbook
Dim wks1 As Worksheet, wks2 As Worksheet
Set wb1 = Workbooks("Datei1.xls")
Set wb2 = Workbooks("Datei2.xls")
Set wks1 = wb1.Worksheets("Tabelle1")
Set wks2 = wb2.Worksheets("Tabelle1")
'Nächste freie Zeile in wks2 im Bereich Spalten B bis F ermitteln
For Spalte = 2 To 6
Zeile = Application.WorksheetFunction.Max(Zeile, wks2.Cells(wks2.Rows.Count, Spalte).End(xlUp).Row)
Next
Zeile = Zeile + 1
wks2.Cells(Zeile, 2).Range("A1:E2").Value = wks1.Range("G28:K29").Value
End Sub

Anzeige
AW: Eintrag in nächste freie Zeile
31.01.2007 09:18:29
Patrick
Hallo Franz,
vielen Dank funktioniert klasse. Danke !!
Gruß
Patrick
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige