ファイル拡張子を.tmpから.txtに変更してください。

Question

ファイルシステムのメンバーであるfilecopyクラスがありますが、ファイル拡張子を変更したいだけでした。ファイル名を変更するクラスはありますか？

Answer 1

このマクロを使用すると、.txtというフォルダ内のすべての.tmpファイルの名前を変更できます。

はVBA Name方法を見てみましょう：

名前ステートメントは、ファイルの名前を変更し、必要に応じて、異なる ディレクトリまたはフォルダに移動します。名前は のドライブ間でファイルを移動できますが、newpathnameとoldpathnameの両方が同じドライブにある場合は、既存のディレクトリまたはフォルダの名前を変更することができます。名前は は新しいファイル、ディレクトリ、またはフォルダを作成できません。

コード：

Sub rename_files() 

    Dim MyFolder As String, MyFile As String, NewName As String, i As Integer 

    MyFolder = "C:\Users\User1\Desktop\test_folder\" 
    MyFile = Dir(MyFolder & "*.tmp") 

    Do While MyFile <> "" 
     i = InStrRev(MyFile, ".") 
     NewName = Left(MyFile, i - 1) & ".txt" 
     Name MyFolder & MyFile As MyFolder & NewName 
     MyFile = Dir 
    Loop 

End Sub