Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1792to1796
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

VBA Pfad ersetzen

VBA Pfad ersetzen
11.11.2020 21: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

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

Betreff
Datum
Anwender
Anzeige
AW: VBA Pfad ersetzen
11.11.2020 21: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 21: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 22: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
AW: VBA Pfad ersetzen
11.11.2020 22: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 22: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
AW: VBA Pfad ersetzen
11.11.2020 23:06:31
kili
Falsches Bild....so hab ich es geschrieben:
Userbild
Anzeige
AW: VBA Pfad ersetzen
12.11.2020 00: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
AW: VBA Pfad ersetzen
12.11.2020 00: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. :-)

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige