👋

[VBA] フォルダ内のファイル名を一括変更するツール

2023/04/30に公開

Windowsでフォルダの中のファイルの名前を連番に付け替えたいだとか、
ある規則に従った名前に変更したいというときに使えるツール。

エクセルのセルを使って変更する名前を決めるので、
エクセル関数や&を使った名前連結ができるなど、カスタマイズ性が高い一方で、
初心者に敷居が高いシェル操作なども必要ない。

例として a, b, c ...と名前の付いたファイルがあるとする。

そこでここにあるエクセルファイルを利用する。
開いたら以下の画面になる

「GetFileName」ボタンをクリックすると、フォルダーが選択できる。

選択して、OKをクリックするとフォルダーの直下にあるファイル一覧が
セルの1列目（左側）に列挙され、1列目（右側）にはコピーが入る。

ここで、1, 2, 3 ...　という規則に変えたいとすれば、
1, 2をB4, B5セルに入力し、フィルハンドルする。

ここで「RUN」キーを押すと、入力がおかしくなければファイル名が一括で変換され、
メッセージが出る。

エクスプローラーでフォルダを見ると確かに変わっている。

使用する場合、ファイル変更には細心の注意を払ってください。
この記事およびにツールによって生じた損害には著者は一切の責任を負わないものとします。