Dateiendung ändern

  • Word

Es gibt 2 Antworten in diesem Thema. Der letzte Beitrag () ist von Nergal.

    Dateiendung ändern

    Hallo,

    ich bin ein absoluter Neuling was VBA angeht und suche eine Möglichkeit, wie ich eine Dateiendung ändern kann.
    Ich habe den Namen einer Datei, dessen Endung ich nicht kenne und möchte diese auf z.B. .txt ändern. Gibt es dafür eine VBA Methode, oder müßte ich mir das selber basteln?

    Gruß
    Nergal

    Zum Umbenennen kann man "Name ... As ..." verwenden.

    Um die Dateiendung herauszufinden, kannst du die Dir-Funktion benutzen.

    Visual Basic-Quellcode

    1. Dateiname = "C:\Ordner\" & Dir("C:\Ordner\Datei*.*")
    2. neuerDateiname = Left(Dateiname, InStrRev(Dateiname, ".") - 1) & ".txt"
    3. Name Dateiname As neuerDateiname


    Die InStrRev-Funktion, die ich in meinem Beispiel verwende, sucht von rechts nach links nach dem Punkt. Es gibt ja schließlich auch Dateiendungen mit 4 oder noch mehr Zeichen.

Facebook
Telefonspende