Dieses Forum nutzt Cookies
Dieses Forum verwendet Cookies, um deine Login-Informationen zu speichern, wenn du registriert bist, und deinen letzten Besuch, wenn du es nicht bist. Cookies sind kleine Textdokumente, die auf deinem Computer gespeichert werden. Die von diesem Forum gesetzten Cookies werden nur auf dieser Website verwendet und stellen kein Sicherheitsrisiko dar. Cookies aus diesem Forum speichern auch die spezifischen Themen, die du gelesen hast und wann du zum letzten Mal gelesen hast. Bitte bestätige, ob du diese Cookies akzeptierst oder ablehnst.

Ein Cookie wird in deinem Browser unabhängig von der Wahl gespeichert, um zu verhindern, dass dir diese Frage erneut gestellt wird. Du kannst deine Cookie-Einstellungen jederzeit über den Link in der Fußzeile ändern.

Pfad per VBA auslesen lassen
#1
Hallo VBA-Freunde,
ich grüble wieder mal über eine VBA-Lösung:
Ich habe eine Excelmappe, die heißt Collectingsheet.xlsm.

Es soll nun folgendes geschehen:
Der User öffnet eine Excelmappe z.B „2014-05-12 Smartsheet.xlsm“ und bearbeitet diese Mappe. Irgendwo auf dem Rechner ist die Collectingsheet.xlsm gespeichert. nach dem Bearbeiten der geöffneten Mappe soll die Tabelle „Summery“ in die Collectingsheet.xlsm gespeichert werden.

Wenn das in dem gleichen Ordner stattfinden würde, wäre es ja kein Problem den Pfad auslesen zu lassen. Da ich aber keine Möglichkeit habe, den Usern einen Speicherort der „Collectingsheet.xlsm“ vorzuschreiben, die einen machen es auf dem Server, die anderen auf ihrem Laptop, bräuchte ich eine Möglichkeit den Pfad zu der Mappe „Collectingsheet.xlsm“ per VBA in der Mappe „2014-05-12 Smartsheet.xlsm“ einlesen zu lassen, damit ich zum Speichern der Daten die Mappe „Collectingsheet.xlsm“ öffnen kann.

Die User öffnen am Anfang eine Mustermappe "Smartsheet.xlsm" in der das Makro zum Auslesen verankert werden soll. Die Mappe "Smartsheet.xlsm" wird beim beenden dann woanders gespeichert.

Wer weis mir da eine Lösung?

Vielen Dank schon im voraus.
Es ist nicht genug, zu wissen. Man muss es auch anwenden.
Es ist nicht genug, zu wollen. Man muss es auch tun.
Antworten Top
#2
Hallo Heinz,
Soll der User beim Pfad definieren die Mappe C.. auch öffnen oder soll die automatisch gefunden werden? Im letzten Fall muss der User beim automatischen Suchen ggf. eine Auswahl treffen, falls es die Datei mehr als ein mal gibt. Bei größeren Datenmengen kann die Suche auch etwas länger dauern.
.      \\\|///      Hoffe, geholfen zu haben.
       ( ô ô )      Grüße, André aus G in T  
  ooO-(_)-Ooo    (Excel 97-2019+365)
Antworten Top
#3
Hallo Andre,
wir machen es jetzt anders. Beim Speichern des smartsheets wird beim Beenden der Mappe der Speicerpfad
der Mappe in eine zentrale Mappe geschrieben.
Danke
Es ist nicht genug, zu wissen. Man muss es auch anwenden.
Es ist nicht genug, zu wollen. Man muss es auch tun.
Antworten Top
#4
Hallo Heinz,

hier mal nur der Vollständigkeit halber ein Ansatz, falls die entsprechende Exceldatei neben weiteren Exceldateien offen ist. Ich habe hier die Namen der Mappen mit dem großgeschriebenen Namen verglichen. Letztendlich weiß man vielleicht nicht, wie die Datei im Einzelfall gespeichert wurde. Test.xls, test.xls, Test.XLS oder wie auch immer.

Code:
Sub MappenPfad()
'Variablendeklarationen
'Workbook
Dim mappen As Workbook
'Schleife ueber alle offenen Mappen
For Each mappen In Workbooks
  'Wenn der grossgeschriebene Name der Mappe TEST.XLS ist, dann
   If UCase(mappen.Name) = "TEST.XLS" Then
   'Pfad der Mappe ausgeben
   MsgBox UCase(mappen.Path)
  'Ende Wenn der grossgeschriebene Name der Mappe TEST.XLS ist, dann
   End If
'Ende Schleife ueber alle offenen Mappen
Next
End Sub
.      \\\|///      Hoffe, geholfen zu haben.
       ( ô ô )      Grüße, André aus G in T  
  ooO-(_)-Ooo    (Excel 97-2019+365)
Antworten Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste