Thema Datum  Von Nutzer Rating
Antwort
Rot Variable nimmt bei ActiveWorkbook.Name neuen Wert an soll aber Fix sein
03.05.2023 16:34:47 Bernd
Solved
03.05.2023 17:52:12 Gast58885
NotSolved
03.05.2023 22:52:37 xlKing
NotSolved

Ansicht des Beitrags:
Von:
Bernd
Datum:
03.05.2023 16:34:47
Views:
278
Rating: Antwort:
 Nein
Thema:
Variable nimmt bei ActiveWorkbook.Name neuen Wert an soll aber Fix sein

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.


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:

 
 

  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Variable nimmt bei ActiveWorkbook.Name neuen Wert an soll aber Fix sein
03.05.2023 16:34:47 Bernd
Solved
03.05.2023 17:52:12 Gast58885
NotSolved
03.05.2023 22:52:37 xlKing
NotSolved