Excel

Excelマクロ紹介!ファイル名を一括変更するマクロを解説!

大量のファイル名を変更するときありませんか?

1つ1つ手入力すると、なかなか大変ですよね…

そこで、Excelみたいに一括変更できるマクロを作りました!

この記事ではファイル名を変更するマクロについて紹介します!

さかい

はじめまして、さかいと申します。
Excelマクロ エキスパートの資格を持っている自分が
解説させていただきます!

マクロを作る前の準備

まず、マクロを作成するために準備をしていきます

Excelファイルの上にあるツールバーに

「開発」タブを表示させます

既に表示している方は2 マクロを作るにジャンプしていただいてOKです

開発タブを表示

①ツールバーの上で右クリック

②「リボンのユーザー設定」を選択

すると、Excelのオプションが開きます

③「開発」にチェックをつけてOKをクリック

ツールバーに「開発」タブが表示されます。

 これで準備完了です!

 これでマクロを作ることができます!

 早速マクロを作成していきましょう。

マクロを作る

まず初めに、間違えやすい3つの言葉について説明します。

マクロ|自動で処理をする「機能」

VBA|マクロを作るためのプログラミング言語

VBE|VBAを書くエディタ(メモ帳みたいなもの)

今回はVBEにコードを書いて、マクロを実行していきます。

①VBEを起動

「開発」タブから「Visual Basic」をクリック

または「Alt + F11」でもOKです

以下の画面が表示されます

②プロジェクトから標準モジュールを挿入

 プロジェクト→挿入→標準モジュールをクリック

標準モジュールが表示されるとOKです

③Module1に以下のコードを貼り付け

Sub updFileName()
  'フォルダパスを宣言
  Dim path As String
  Dim j As Integer

  'A2セルの文字をパスに設定
  path = Cells(2, 1) & "\"
  j = 1
  
  'B4セルからファイル名を更新
  Do Until Cells(j + 3, 1) = ""
    'A列のファイル名をB列のファイル名に更新
    Name path & Cells(j + 3, 1) As path & Cells(j + 3, 2)
    j = j + 1
  Loop
End Sub

これでマクロの完成です!

④マクロの実行

A2セルにフォルダパス、A4セルに修正前のファイル名を入力

ファイル名取得マクロを使うと、効率的です

↓過去に投稿したファイル名取得マクロ↓

修正後のファイル名を入力完了

オートフィルで効率的に入力しましょう

修正後のファイル名を入力
修正後のファイル名を入力完了

▶︎(実行ボタン)をクリック

ファイル名が変更されました!

ファイル名一括変更のマクロの使い方は以上になります。

また、ファイル名が存在していなかったり、ファイル名が重複していると

エラーが表示されるので、ファイル名、フォルダパスをご確認ください!

まとめ

ここまでお疲れさまでした。

ファイル名を変更するマクロについて説明させていただきました。

手入力より速く楽にできるので、とてもオススメです!

また、置換を使うことで入力ミスなども減るので

ぜひぜひ使ってみてください!