Windows(" ?
Mister
mit folgendem Makro kopiere ich Daten aus einer Datei und füge sie in die aktuelle Datei:
Sub UpdatePosten()
UnprotectAll
Windows("DPO 2009 v. 5.05.xls").Activate
Sheets("HB-Posten").Select
Cells.Select
Selection.Copy
Windows("DPO 2009 v. 5.06.xls").Activate
Sheets("HB-Posten").Select
Cells.Select
ActiveSheet.Paste
End Sub
Kann ich statt die Namen der Dateien einzugeben, sie aus einer Tabelle lesen (z.B. die Name der zu aktivierenden Datei steht in Tabelle 1 "A1"?
Danke und Gruß Martin
Anzeige