見出し画像

ファイル、フォルダのリネームツールを作ってみる①

私生活ではそんなになくても、仕事上たくさんのファイルの名前を一度に変更したいことはよくあるものです。

エクセルで台帳管理とかしてると、ファイル名とか改定符号を大量に変更するときに、エクセルの置換とか、文字列操作を駆使して、一度にファイル名が変更できたらなと思ったので作っていきましょう。

とりあえず、コードは後から考えるとして、ツールのレイアウトから作成できるのがExcel VBAのいいところ。

■必要な要素
1.”フォルダを開く” ボタン
 フォルダを選択するためのダイアログ画面を呼び出すためのボタン

2.”ファイル名取得” ボタン
 選択されたフォルダの中のファイル名、フォルダ名をEXCELシートに書き出すボタン

3."書き換え" ボタン
 ファイル名を実際に書き換える命令を実行するボタン

4.”クリア” ボタン
 作業が終わったらファイル名、フォルダ名のセルをクリアするボタン

5.”フォルダパス” テキストボックス
 フォルダを開く、で選択したパスを表示したり、直接入力するためのテキストボックス

上記の5つの要素を開発タブから配置して、今回は2行目3行めは項目名の表示に使用。4行目からがファイル名、フォルダ名を表示するエリアとします。

配置例

次回は実際に各要素の動作をコーディングしていきます。

この記事が気に入ったらサポートをしてみませんか?