Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
952to956
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
952to956
952to956
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Text/String

Text/String
26.02.2008 13:06:42
Ludwig
Hallo Eperten
Die Funktion
sPath = Application.GetSaveAsFilename(, "PDF-Datei (*.pdf),*.pdf")
liefert mir folgenden Wert für sPath:
"C:\Users\thelle\Documents\Berechnungen\M001 GapCon\1 Anfragen\A27334 M001"
Jetzt möchte ich den Pfad mit VBA.ChDir sPath setzen!
Wie kann ich erreichen, dass der Text hinter dem letzten "\" entfernt wird?
Vielen Dank für eine Antwort im voraus!
Gruß Ludwig

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Text/String
26.02.2008 13:12:43
Rudi
Hallo,
sPath=Left(spath,instrrev(spath,"\"))
Gruß
Rudi
Eine Kuh macht Muh, viele Kühe machen Mühe

AW: Text/String
26.02.2008 13:32:00
Ludwig
Hallo Rudi
Das wars wonach ich suchte!
Leider liefern die Befehle

Application.SendKeys (sFile), True
Application.SendKeys (D_Name), True
ActiveWindow.SelectedSheets.PrintOut ActivePrinter:=SuchDrucker
'"Adobe PDF auf Ne06:"
leider nicht die richtigen Einträge in der nachfolgenden Dateimaske!
Hast Du hierzu auch noch eine Idee?
Vielen Dank im voraus!
Gruß Ludwig

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige