Hallo zusammen,
gibt es eine Möglichkeit es so zu verändern, dass die Quelldatei (Mappe1) nicht geöffnet und geschlossen werden muss, sondern es im Hintergrund ausgeführt wird?
Sub Aktualisieren()
Stamm = ActiveWorkbook.Name
Quelldatei = "Mappe1.xlsx"
Workbooks.Open Filename:="L:\" & Quelldatei
Workbooks(Quelldatei).Sheets("Tabelle1").Range("A2:AX3").Copy
Workbooks(Stamm).Sheets("Informationen").Range("A2:AX3").PasteSpecial xlPasteValues
Application.CutCopyMode = False
Workbooks(Quelldatei).Close
End Sub
Danke für Vorschläge!
Grüße,
Daniel
|