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

VBA Pfad ersetzen

Forumthread: VBA Pfad ersetzen

VBA Pfad ersetzen
11.11.2020 22:14:01
kili
Hallo Freunde,
wenn ich meine Datei versende, müssen die Empfänger immer folgende zwei Code-Zeilen ändern:
Const ORDERBUCHFILE As String = "C:\Users\holge\Documents\Orderbuch.json"
Const KURSVERLAUFFILE As String = "C:\Users\holge\Documents\Kursverlauf.json"
Wie ändere ich das ab?
Vielen Dank.
Gruß kili
Anzeige

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA Pfad ersetzen
11.11.2020 22:31:24
Daniel
HI
was müssen sie denn ändern?
und wohin müsssen sie es ändern?
Gruß Daniel
AW: VBA Pfad ersetzen
11.11.2020 22:56:29
kili
Hallo Daniel,
C:\Users\holge\Documents bezieht sich auf meinen PC.
Die Empfänger müssen quasi immer das \holge\ durch ihren Benutzernamen ersetzen.
Gruß kili
AW: VBA Pfad ersetzen
11.11.2020 23:11:32
Tobias
Hallo Kili,
schau dir mal

Debug.Print Environ("Userprofile")
an.
Denke das könnte helfen, zumindest unter Windows
Schöne Grüße
Tobias
Anzeige
AW: VBA Pfad ersetzen
11.11.2020 23:21:28
Daniel
Hi
1. Verwende Variablen anstelle von konstanten.
2. weise zu beginn zu:
ORDERBUCHFILE = Environ("Homedrive") & Environ("homepath") & Application.PathSeperator & "Documents" & Application.PathSeperartor & "Orderbuch.json
"
Gruß Daniel
Anzeige
AW: VBA Pfad ersetzen
11.11.2020 23:59:21
kili
@Daniel und Tobias:
Was ihr schreibt, wird richtig sein, aber ich stelle mich wieder zu blöd an.
Die Zeile Const Orderbuchfile As String = "C:\Users\holge\Documents\Orderbuch.json"
habe ich ersetzt durch
Dim Orderbuchfile as String = Environ("Homedrive") & Environ("homepath") & Application.PathSeperator & "Documents" & Application.PathSeperartor & "Orderbuch.json"
Excel meckert rum und schreibt:
Userbild
Anzeige
AW: VBA Pfad ersetzen
12.11.2020 00:06:31
kili
Falsches Bild....so hab ich es geschrieben:
Userbild
AW: VBA Pfad ersetzen
12.11.2020 01:13:24
Daniel
kontrolliere deine Rechtschreibung!
oder nutzte zum Programmieren die Intellisense.
dabei tippt man nur die ersten Buchstaben eines Begriffs ein und drückt dann STRG+Leer, dann ergänzt der VBA-Editor den Begriff oder zeigt eine Ausswahlliste an.
Gruß Daniel
Anzeige
AW: VBA Pfad ersetzen
12.11.2020 01:32:44
kili
Daniel, du bist der Beste!
Vielen Dank.
Den Fehler hatte ich nicht erkannt, weil ich Deine Zeile copygepasted habe.
Jetzt funktioniert es einwandfrei. :-)
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
14.05.2026 09:50:42
13.05.2026 19:14:18