|
Hi Ich habe ein Workbook, in dem ich ein Makro eingebunden habe.
Da ich es weitergebe und sich der Name und Speicherort ändern kann, habe ich nach dem Öffnen die Variablen als String deklariert und mit
ZPath = ActiveWorkbook.FullName
ZName = ActiveWorkbook.Name 'Erstellt sich aus aktiver Zieldatei
ZSheet = ActiveSheet.Name 'Erstellt sich aus aktiven Zielsheet
befüllt. Soweitso gut.
Nun soll eine weitere Datei mit ebenfalls Variablen Namen, Ort geöffnet werden:
QuellDatei = Application.GetOpenFilename("CSV Dateien (*.csv), *.csv")
Workbooks.Open Filename:=QuellDatei
QName = ActiveWorkbook.Name 'Erstellt sich aus aktiver Datei
QSheet = ActiveSheet.Name
Leider ist es so, das sich automatisch die ZielVariablen ZPath, ZName, ZSheet sofort mit dem neuen Quellwerten QPath, QName, QSheet überschreibt.
Alle Variablen sind String.
Wie kann ich es machen, das die QuellVariablen ihren Namen behalten (Fixieren?)
Wahrscheinlich ganz einfach, aber ich bekomme es gerade nicht hin.
OK ganz Blöd.
Ich hatte das im Ausdruckfenster gesehen.
Wenn ich mit der Maus über die ZielVariable gehe, zeigt er mir die richtigen Werte an.
Ich bin vorhin versehendlich auf die ActiveWorkbook Variable gekommen und hatte den Wert im Ausdruckfenster gesehen.
Daraufhin war ich etwas verwirrt.
OK Gelöst.
|