1
Excel / Antw:Office 2016 Tabellenblatt in einer anderen Datei ersetzen/ Werte komplett austau
« am: Juli 12, 2018, 11:31:38 Vormittag »
ich habe es mal simpel probiert:
hm..er stört sich an der Paste-Methode
Code: [Auswählen]
Sub Schaltfläche1_Klicken()
Dim pfad As String
pfad = ActiveSheet.Cells(4, 1).Value
Dim wbStart, wbZiel As Workbook
Set wbStart = ActiveWorkbook
Set wbZiel = Workbooks.Open(pfad)
wbStart.Sheets("Tabelle1").Range("A:H").Copy
wbZiel.Sheets("Tabelle1").Range("A:H").Select
wbZiel.Sheets("Tabelle1").Paste
End Sub
hm..er stört sich an der Paste-Methode