Anzeige
Archiv - Navigation
632to636
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
632to636
632to636
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Daten kopieren und übertragen

Daten kopieren und übertragen
04.07.2005 12:48:34
Klaus
Hallo Leute,
ich benötige für einen Datentransfer ein Makro:
Ich möchte eine Datenzeile einer Tabelle in eine zweite Tabelle kopieren und zwar so, dass der Eintrag in der zweiten Tabelle in die nächste frei Zeile gesetzt wird.Einiges habe ich schon ausprobiert, aber leider hat es letztendlich nicht funktioniert - Vielleicht habe ich auch einen Denkfehler in meinen Überlegungen.
Vielen Dank für Eure Antworten im voraus.
Gruß
Klaus

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

Betreff
Datum
Anwender
Anzeige
AW: Daten kopieren und übertragen
04.07.2005 13:13:50
Lothar
Hi,
wo ist das Ergebnis deiner Überlegungen?
mfg Lothar
AW: Daten kopieren und übertragen
04.07.2005 13:37:10
Harald
Hallo Klaus,
vielleicht so ?
A1:Z1 aus Blatt 1 nach Blatt 3 (jeweils erste freie Zeile)
A1:Z1 Inhalte löschen ist auskommentiert.

Sub Test()
Dim n as Long
n = Sheets(3).Cells(Rows.Count, 1).End(xlUp).Row + 1
Sheets(3).Range("A" & n & ":Z" & n) = Sheets(1).Range("a1:Z1").Value
'Sheets(1).Range("a1:Z1").ClearContents
End Sub

Gruß
Harald
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige