Datei vom aktuellem Desktop öffnen VBA

[legiminator]

Hallo zusammen,
ich habe ein Makro in dem wird eine Datei geöffnet. In dieses werden dann Daten gespielt und weiter verarbeitet.

Aktuell sieht es so aus:
Application.Workbooks.Open Worksheets("Einstellungen").Range("B9").Value

In B9 steht dann der Pfad:     C:\Users\Benutzername\Desktop\Optimierung.xlsm

Jetzt möchte aber das ich immer die Datei vom akteullen Dekstop öffnen kann. Egal welcher benutzer es ist.
Zu diesem Thema habe ich schon viele Foreneinträge geläsen, jedoch noch nicht den richtigen für mich gefunden.

Ich möchte nun klären
Kann ich meinen Pfad variabel gestealten? Ich habe immer nur gelesen das der Code mit "Environ("USERPROFILE")" variabel gemacht werden kann.

Wenn das mit dem Pfad nicht geht, wie sollte ich dann den Befehl zum Öffnen der Datei machen? Sollte ich dann in B9 nur noch den Dateiname eintragen und nicht den ganzen Pfad?

Würde mich über eure Hilfe freuen.

Vielen dank

[RPP63]

Moin!

Sollte ich dann in B9 nur noch den Dateiname eintragen und nicht den ganzen Pfad?

Ja, genau so würde ich das machen!
In B9: Optimierung.xlsm

Als Codezeile dann:
Workbooks.Open Environ("Userprofile") & "\Desktop\" & Worksheets("Einstellungen").Range("B9")

Gruß Ralf

[legiminator]

Hallo Ralf,
danke für deine Lösung. Problem gelöst.

Ich wünsche dir ein schönes Wochenende!

Gruß Flo