Vba を使用してファイルの名前を変更する方法 (例付き)

VBA のNameステートメントを使用して、Excel ファイルの名前を変更できます。

このステートメントを実際に使用する一般的な方法は次のとおりです。

 SubRenameFile ()

Name "C:\Users\bob\Documents\current_data\my_old_file.xlsx" As _
    "C:\Users\bob\Documents\current_data\my_new_file.xlsx"

End Sub

この特定のマクロは、 my_old_file.xlsxというファイルの名前をmy_new_file.xlsxに変更します。

注: 両方のファイル パスを同じ行に記述することもできますが、読みやすくするために次の行にコードを続けるためにアンダースコア ( _ ) を使用しました。

次の例は、この構文を実際に使用する方法を示しています。

例: VBA を使用してファイルの名前を変更する

次の場所にフォルダーがあるとします。

C:\ユーザー\ボブ\ドキュメント\current_data

このフォルダーには 3 つの Excel ファイルが含まれています。

VBA を使用して、 soccer_data.xlsxというファイルの名前をSoccer_data_new.xlsxに変更するとします。

これを行うには、次のマクロを作成できます。

 SubRenameFile ()

Name "C:\Users\bob\Documents\current_data\soccer_data.xlsx" As _
    "C:\Users\bob\Documents\current_data\soccer_data_new.xlsx"

End Sub

このマクロが実行されると、指定したファイルの名前が変更されます。

フォルダーの場所に移動し、 Soccer_data.xlsx の名前がSoccer_data_new_.xlsx に変更されていることを確認できます。

ファイルの名前が実際に変更され、フォルダー内の他のファイルはすべて変更されていないことがわかります。

注: VBA のNameステートメントの完全なドキュメントは、ここで見つけることができます。

追加リソース

次のチュートリアルでは、VBA で他の一般的なタスクを実行する方法について説明します。

VBA を使用してフォルダーを作成する方法
VBAを使ってフォルダを削除する方法
VBAを使用してファイルを削除する方法
VBAを使用してファイルが存在するかどうかを確認する方法