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

Forumthread: Zellen kopieren und einfügen

Zellen kopieren und einfügen
14.10.2005 17:26:56
Mola
Hallo,
wieso klappt es nicht?
Ich will mir einen Zellbereich aus einer anderen Datei kopieren (nur die Werte) und in der geöffneten Datei einfügen....
Bis zum kopieren der Zellen alles ok - leider bekomme ich nicht die Kurve, dass er mir wieder auf die eigentlich Mappe geht.
Dim Mappe as Workbook
Dim Blatt As Worksheet
Set Blatt = Sheets
Set Mappe = Workbooks.Open ("C:.....")
Sheets("Übersicht").Select
Range(Range("B8:J8"), Range("B8:J8").End(xlDown)).Select
Mappe.Save
Mappe.Close
ActiveSheet.Select
Range("B8").Select
ActiveCell.Paste
End Sub
Kann mich jemand auf den richtigen Weg bringen?
Viele Grüße
Mola
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Zellen kopieren und einfügen
14.10.2005 18:10:32
Leo
Hi,

Sub til()
Dim Mappe As Workbook
Dim Blatt As Worksheet
Set Blatt = ActiveSheet
Set Mappe = Workbooks.Open("C:.....")
Mappe.Sheets("Übersicht").Range(Range("B8:J8"), Range("B8:J8").End(xlDown)).Copy _
Blatt.Range("B8")
Mappe.Close
End Sub

mfg Leo
Anzeige
Super - Dankeschön Leo!- o.T.
14.10.2005 18:23:32
Mola
.
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige