Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Dateinamen aus einem String auslesen
zurück: Abspeichern funktioniert nur jedes 2 mal weiter: String zu bereits gefüllter Zelle hinzufügen Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Feedback Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
DennisWHV
Im Profil kannst Du frei den Rang ändern


Verfasst am:
01. Sep 2008, 12:39
Rufname:

Dateinamen aus einem String auslesen - Dateinamen aus einem String auslesen

Nach oben
       Version: Office 2003

Hallo!

Ich arbeite mit Word 2003 und habe in einem VBA-Makro eine Variable, die einen String enthält, der einen Dateinamen mit kompletter Pfadangabe enthält.

z.B.
a = "C:\Verzeichnis\Dateiname.txt"

Wie kann ich aus diesem String jetzt den Dateinamen in eine andere Variable extrahieren? Ich möchte also eine Variable, die nur "Dateiname.txt" enthält. Mit welchem Befehl läßt sich das lösen? Da der Dateiname nicht immer die gleiche Länge hat, kann ich nicht einfach mit der Funktion Right eine feste Anzahl von Zeichen auslesen. Wie kann ich z.B. von der rechten Seite des Strings alles auslesen, das vor dem Zeichen \ steht?

Wäre dankbar für einen kleinen Tip.

Gruß

Dennis
Lisa
Moderator; Word seit Word 5.0 (für DOS)


Verfasst am:
01. Sep 2008, 12:58
Rufname:
Wohnort: Leipzig

AW: Dateinamen aus einem String auslesen - AW: Dateinamen aus einem String auslesen

Nach oben
       Version: Office 2003

Hallo Dennis,

das geht im InStrRev und Mid, etwa so:
Code:
Sub Test()

    Dim a As String
    Dim b As String
    Dim intPos As Integer
   

    a = "C:\Verzeichnis\Dateiname.txt"
    intPos = InStrRev(a, "\", -1, vbBinaryCompare)
    b = Mid(a, intPos + 1, Len(a) - intPos)
    MsgBox b

End Sub

Gruß
Lisa
Gast



Verfasst am:
01. Sep 2008, 14:11
Rufname:


AW: Dateinamen aus einem String auslesen - AW: Dateinamen aus einem String auslesen

Nach oben
       Version: Office 2003

Danke für Hilfe!

Ich habe kurzfristig noch eine andere, sehr einfache Möglichkeit gefunden:

Dim Teile As Variant
Teile = Split(Variable, "\")
DateiName = Teile(UBound(Teile))

Trotzdem danke für die schnelle Hilfe!

Dennis
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Word Formate: Auslesen von Format, Seitenrändern etc. aus bestehendem Doc 2 wuschelnatalie 102 27. Dez 2013, 16:34
wuschelnatalie Auslesen von Format, Seitenrändern etc. aus bestehendem Doc
Keine neuen Beiträge Word Serienbriefe: Seriendruckfelder nur bei bestimmten Datensätzen auslesen 0 skorpion.14 199 10. Okt 2012, 20:28
skorpion.14 Seriendruckfelder nur bei bestimmten Datensätzen auslesen
Keine neuen Beiträge Word Formate: Hyperlinks auch ohne STRING Taste direkt öffnen lassen? 2 Roelli2 2950 06. Sep 2008, 18:50
Gast Hyperlinks auch ohne STRING Taste direkt öffnen lassen?
Keine neuen Beiträge Word VBA Programmierung (Makros): Teile von Feldwerten auslesen? 2 Fr@nk 699 01. Sep 2007, 09:32
HermannL Teile von Feldwerten auslesen?
Keine neuen Beiträge Word VBA Programmierung (Makros): String in einzelne buchstaben 1 RajHid 3341 13. Aug 2007, 09:53
nitro_storm String in einzelne buchstaben
Keine neuen Beiträge Word VBA Programmierung (Makros): Auslesen einer UserForm/Wordvorlage und in Neues Dokument ab 0 Gast 1108 25. Jun 2007, 00:28
Gast Auslesen einer UserForm/Wordvorlage und in Neues Dokument ab
Keine neuen Beiträge Word VBA Programmierung (Makros): Dateinamen an andere Formulare übergeben 0 futzi-ka 606 02. Mai 2007, 11:40
futzi-ka Dateinamen an andere Formulare übergeben
Keine neuen Beiträge Word VBA Programmierung (Makros): Dateiname und Pfad auslesen und weiter verarbeiten 5 BauerMatthias 6133 09. Apr 2007, 18:13
steffen0815 Dateiname und Pfad auslesen und weiter verarbeiten
Keine neuen Beiträge Word VBA Programmierung (Makros): Benutzerinformationen via vba auslesen/abändern 1 Thorsten82 2021 19. Feb 2007, 18:14
Thorsten82 Benutzerinformationen via vba auslesen/abändern
Keine neuen Beiträge Word VBA Programmierung (Makros): gesamten text in string 2 makronius 697 13. Nov 2006, 14:24
makronius gesamten text in string
Keine neuen Beiträge Word VBA Programmierung (Makros): Positionen von Seitenumbrüchen via VBA auslesen 4 Raphy 1106 06. Nov 2006, 09:40
Raphy Positionen von Seitenumbrüchen via VBA auslesen
Keine neuen Beiträge Word VBA Programmierung (Makros): dateinamen und pfad setzen? 9 JTR 1614 23. Okt 2006, 12:11
JTR dateinamen und pfad setzen?
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Microsoft Project