Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Makro um Datei zu importieren/Pfad in Zelle

Forumthread: Makro um Datei zu importieren/Pfad in Zelle

Makro um Datei zu importieren/Pfad in Zelle
12.08.2024 15:58:55
Konstantin
Hallo zusammen,

ich hätte eine kurze Frage bzgl. eines Makros mit dem ich eine Datei importieren kann deren Pfad in einer extra Zelle steht. Bis jetzt stand im Makro immer einfach der Pfad, die Idee ist jetzt eine Zelle zu haben, in die man den Anfangsbuchstaben des Nachnamens schreibt, dadurch verändert sich in einer anderen Zelle der Pfad damit mehrere Personen die Datei importieren können (Pfad für identische Datei bei jedem etwas anders). Vielleicht könnt ihr mir ja helfen, das Makro soll den Pfad aus der Zelle zum Öffnen der Datei verwenden, bin leider Anfänger und fange gerade erst mit den Grundkenntnissen an, deshalb dachte ich, ich frag mal hier nach:)

Vielen Dank schonmal.

VG
Konsti
Anzeige

11
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Makro um Datei zu importieren/Pfad in Zelle
12.08.2024 17:54:04
Uduuh
Hallo,
ganz schön schwammig.
Workshops.open range(Adresse von andere zelle) & "Dateiname.xlsx"
Ggf. noch einen \ dazwischen

Gruß aus'm Pott
Udo
AW: Makro um Datei zu importieren/Pfad in Zelle
12.08.2024 18:31:34
ralf_b
ich schätze das fehlt noch die Komponente wo der Username vervollständigt wird.
Wie hast du dir das denn gedacht? Gibts da schon ne Liste? Oder wolltest du den aktuellen Usernamen in den Pfad setzen?
Anzeige
AW: Makro um Datei zu importieren/Pfad in Zelle
12.08.2024 19:19:53
Konstantin
Genau, also es gibt drei Pfade und alle führen zur gleichen Datei, nur der Username und eine Ordnerbezeichnung am Anfang ist unterschiedlich.

Bsp.: c: \ max \gespeicherter ordner xy\Datei xy
c: \ julia\freigegebener ordner\Datei xy

Und wenn man den Buchstaben für den Namen in eine Zelle eingibt, ändert sich mit Formel in einer anderen Zelle der Pfad. Also so wie ich mir das vorstelle, kann man mit dem Makro anhand von dem Pfad in der Zelle dann die Datei öffnen & muss nicht extra als anderer User ins Makro und den Pfad dort ändern.

Sorry falls es ein bisschen kryptisch ist, kann später auch ein Bild hochladen, falls noch unklar.

VG
Konsti
Anzeige
AW: Makro um Datei zu importieren/Pfad in Zelle
12.08.2024 21:16:47
ralf_b
soll ein Benutzer denn irgend einen Namen auswählen können oder soll das für den aktuellen Benutzer festgelegt sein?
Du siehst hier gibt es Klärungsbedarf, da mit VBA recht viel möglich ist, und man sich irgendwelche Umwege über Formeln möglicherweise auch sparen kann.
AW: Makro um Datei zu importieren/Pfad in Zelle
13.08.2024 10:28:31
Konstantin
Genau, der Benutzer gibt einfach den Buchstaben für seinen Namen ein, dann ändert sich in der Zelle der Pfad und er kann mit dem Makro die Datei importieren.

Habe die Option für das Auswählen auch schon gesehen, es soll aber nichts extra ausgewählt werden, sondern das Makro soll so funktionieren, dass es den Pfad dann aus der Zelle ausliest & die Datei importiert.

VG
Konstantin
Anzeige
AW: Makro um Datei zu importieren/Pfad in Zelle
13.08.2024 18:33:37
Konstantin
Hallo zusammen,

dachte ich schreibe meine Frage noch einmal ausführlicher, damit keine Missverständnisse mehr aufkommen.

Ich habe eine Excel Datei mit einem Makro, dass eine Datei importiert (im Makro steht der Pfad zu der Datei).
Früher war der Ordner für alle die an dem File arbeiten gleich, jetzt hat sich der Ordner allerdings verschoben und der Pfad ist für jeden etwas anders.

Daher würde ich gerne das Makro so ändern, dass es eine Zelle gibt in der der Pfad des jeweiligen Benutzers steht und das Makro diesen Pfad in der Zelle erkennt und die Datei wie früher auch importiert. Die Idee ist, dass jeder Benutzer einfach den Wert einer anderen Zelle ändert und dann durch Formel der Pfad in der Zelle geändert wird und das Makro für den Benutzer funktioniert wie früher.

Vielen Dank schonmal.

VG
Konstantin
Anzeige
AW: Makro um Datei zu importieren/Pfad in Zelle
13.08.2024 18:53:55
ralf_b
VBA kann den Onedriveordner, auch selbst ermitteln und den Usernamen der angemeldeten Person. Das dürfte dein Listenführen unnötig machen. Eine mögliche Fehlerquelle weniger. Alternativ wäre die Auswahl über einen Datei/Ordner-Auswahl Dialog möglich.
AW: Makro um Datei zu importieren/Pfad in Zelle
13.08.2024 19:15:02
Konstantin
Okay danke für die Info. Wie würde das funktionieren?

VG
Konstantin
Anzeige
AW: Makro um Datei zu importieren/Pfad in Zelle
13.08.2024 19:46:53
ralf_b
z.b. gibt es hier eine einfache Lösung, die aber nicht immer funktioniert : https://www.herber.de/forum/archiv/1928to1932/1930448_OneDrive_Local_Pfad.html
du kannst erstmal dieses makro ausprobieren.

Sub Test()

Dim Arr, i&, Pfad$, username$
username = Environ("username") & "\"
Pfad = Environ("onedrive") & "\"
Arr = Split(ThisWorkbook.path, "/")
For i = 4 To UBound(Arr)
Pfad = Pfad & Arr(i) & "\"
Next
MsgBox "Pfad: " & Pfad & vbCrLf & "UserName: " & username
End Sub
Anzeige
AW: Makro um Datei zu importieren/Pfad in Zelle
13.08.2024 20:37:58
Eifeljoi 5
Hallo

Alternative:
Hier mal ein Versuch wie dein M-Code aussehen könnte(ungetestet) für Power Query
let

username = "Benutzername",
onedrivePath = "OneDrive_Pfad",
workbookPath = "DeineTabelle_Pfad"
in
"Pfad: " & List.Accumulate(List.Skip(Text.Split(workbookPath, "/"), 3), onedrivePath, (state, current) => state & "/" & current)
& "#(lf)UserName: " & username
Anzeige
WorkBooks statt Workshops. owT
12.08.2024 17:55:22
Uduuh

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige