HERBERS
Excel-Forum
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Forumbeitrag
Excel-Version des Fragestellers:
2022
Erfahrungslevel des Fragestellers:
VBA nur mit Recorder
Oberschlumpf
15.07.2024 15:49:14
AW: Makro (bitte prüfen) - Aktives Blatt auf Desktop speichern
Hi,

und bitte WO IM gezeigten MAKRO hast du den gewünschten Pfad GESPEICHERT?
(oder seh wirklich nur ich das nicht?)

Versuch es so:
änder diesen Code...


Path = InputBox("Enter the path in which the sheet is to be saved - the file name extension (.xl??) is automatically added according to the file format!")

...um in...


Dim lstrStdPfad As String
lstrStdPfad = "C:\Everything\Tests\"
Path = InputBox("Enter the path in which the sheet is to be saved - the file name extension (.xl??) is automatically added according to the file format!")
If Mid(Path, 2, 1) <> ":" Then
Path = lstrStdPfad
End If


Ciao
Thorsten
Als Antwort auf diesen Beitrag
tuska
15.07.2024 15:16:34
AW: Makro (bitte prüfen) - Aktives Blatt auf Desktop speichern
Hallo ralf_b,

Danke!

Mit diesem Code habe ich eine neue Variante kennengelernt, die mir sehr gefällt:
Als Vorschlag erscheint der PFAD in dem sich die EXCEL-DATEI mit dem Makro befindet.
Diese Variante werde ich mir speichern.

Gewünscht habe ich mir folgendes:
Es soll der PFAD als Vorschlag erscheinen, den ich IM MAKRO GESPEICHERT habe, zB
Path = "C:\Everything\Tests\"

Könntest Du bitte diese Variante ebenfalls prüfen.
Danke!
Antwort auf Beitrag erstellen

Beispieldatei hochladen