Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1528to1532
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Quelldatei dynamisch anpassen

Quelldatei dynamisch anpassen
16.12.2016 07:48:12
Weber
Hallo,
ich möchte die Bezeichnung der Quelldatei, wenn möglich, dynamisch anpassen.
Die Datei nennt sich in etwa "Hauptdatei_20161216_V01.xlsx". Diese Datei wird regelmäßig aktualisiert und mit dem aktuellen Datum und Version angepasst.
Aktuell habe ich folgende Code geschrieben und muss bei jeder Änderung den Dateiname ändern..
Dim Wb As Workbook: Set Wb = Workbooks.Open("C:\Users\Desktop\Hauptdatei_20161216_V01.xlsx")
Danke für eure Hilfe!

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Quelldatei dynamisch anpassen
16.12.2016 09:53:07
guenni

Dim Wb As Workbook: Set Wb = Workbooks.Open(inputbox(Bitte Dateinamen aktualisieren"," _
Hauptdatei","C:\Users\Desktop\Hauptdatei_20161216_V01.xlsx"))

AW: Quelldatei dynamisch anpassen
16.12.2016 10:27:22
Weber
Hallo Guenni,
vielen Dank, mit
Dim Wb As Workbook: Set Wb = Workbooks.Open(inputbox("Bitte Dateinamen aktualisieren"," _
Hauptdatei","C:\Users\Desktop\Hauptdatei_20161216_V01.xlsx"))
hat es wunderbar geklappt!
Da fehlte noch ein vor dem "Bitte" ;)
AW: Quelldatei dynamisch anpassen
16.12.2016 11:24:20
guenni

set wks_neu = activeworksheet

Da das kopierte Worksheet akltiviert wird (mindestens wenn echo on ist)
Als Index müsstest Du den höchsten Index nehmen, da das Worksheet angehängt wird. Die Indizes sind nur nach dem Öffnen einer datei in der Reihenfolge wie die Tabs angezeigt werden.
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige