Jede Woche wird eine neue Datei erstellt, die auf die 4 vorhergehenden Dateien Daten holt. Da dies bisher alles händisch geändert wurde und seine Zeit braucht, schreibe ich dazu gerade ein Programm.
Nun stehe ich vor dem Problem mit den Links ändern. Hab ein Makro aufgenommen und den Code geä _ ndert der so aussieht:
ChDir "P:\Pfad"
ActiveWorkbook.ChangeLink Name:= _
"P:\Pfad\REP_130712_Name.xlsx" _
, NewName:= _
"P:\Pfad\REP_" & Dat(Datum, 3) & "_Name.xlsx" _
, Type:=xlExcelLinks
Dat(Datum, 3)
ist eine Funktion die das Datum im Format YYMMDD ausgibt. Datum ist ein Montag und 3 die Tage die vom aktuellen abgezogen werden müssen um auf die richtige Datei zu verlinken (das Datum ist ja im Namen und wird jeden Tag geändert, dh am Ende der Woche ist es der Freitag, daher Montag - 3 = Freitag)Hoffe dies ist soweit klar. Ansonsten könnt ihr ja fragen bzw Tipps geben wie es einfacher ginge.
Zurück zu meinem Problem:
Der Link wird zwar geändert, aber er fragt mich dann welches Tabellenblatt ich wählen will. Kann ich das als VBA programmieren, dass er immer das 5. Tabellenblatt auswählt bei der Abfrage?
Das Makro hat die Auswahl nicht mitgenommen.
Danke schon mal für die Hilfe
Grüße Alex