Makro Daten kopieren und einfügen
24.03.2015 12:38:35
Sascha
bei folgendem Makro Anliegen bräuchte ich mal euren Rat:
Sub Zwischenstand()
Workbooks.Open ("D:\Users\SaschaFiedler\Desktop\test2.xlsm"), Password:="test", _
WriteResPassword:="test"
Worksheets("Tabelle1").Activate
ActiveSheet.ShowAllData
ActiveWorkbook.SaveAs ("D:\Users\SaschaFiedler\Desktop\test3.xlsm")
ActiveWorkbook.Close
Workbooks.Open ("D:\Users\SaschaFiedler\Desktop\test3.xlsm"), Password:="test", _
WriteResPassword:="test"
Worksheets("Tabelle1").Activate
Range("D11:I12").Copy
End Sub
Bekomme ich das irgendwie über Selection.Paste oder so hin?
Vielen Dank im Voraus
Gruß
Sascha
Anzeige