csvデータにリネームしたい文字列と現在のファイル名があります。
A列にはリネームしたい文字列、B列には、現在のファイル名が順番に並んでいます。
これをどうにかしてリネームしたいのですが、何か良い方法はありませんでしょうか?
A列リネームする文字列 | B列 現在のファイル名
-----------------------|------------------------
1234 |010.jpg
2334 |030.jpg
4534 |abc.jpg
1258 |aaa.jpg
3134 |ddd.jpg
No.2ベストアンサー
- 回答日時:
(1)エクセルのデータを次のように変えてください。
A B C
1 ren (現在のファイル名) (変えたいファイル名)
2 ren (〃) (〃)
3 ren (〃) (〃)
4 ren (〃) (〃)
注意:各列の間に十分な空白があくように、列幅を調整してください。
(2)名前を付けて保存で、
ファイル形式を「テキスト(スペース区切り)」
ファイル名を「rename.bat」
にして、名前を変えたいファイル群と同じフォルダに保存してください。
(3)rename.batをダブルクリックしてください。
念のため、名前を変えたいファイル群を、別のフォルダーにバックアップしてからやってください。
No.1
- 回答日時:
ファイルのリネームはVBA(マクロ)で
NAME 旧ファイル名 As 新ファイル名
とすることで実現できます。。
ファイル名は、C:\SAMPLE\A.JPG といった感じでフルパスで指定します。
これ上から順番に処理していけば可能です。以下簡単なサンプルです。
Sub ChangeFileName()
Dim Target As Range
Dim OldName As String, NewName As String
Const PATH = "C:\SAMPLE\"
For Each Target In ActiveSheet.Range(Range("A1"), Range("A1").End(xlDown))
OldName = PATH & Target.Offset(0, 1).Value
NewName = PATH & Target.Value
If OldName <> "" Then
If Dir(OldName) <> "" Then
Name OldName As NewName
End If
End If
Next
End Sub
あとは、同名ファイルが存在しないかなどのエラーチェックも必要になると思います。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) Excel 毎日手作業で時間がかかって、泣きたいです、、、VBAのプロの方、助けてください。。。 3 2022/10/25 04:26
- その他(ソフトウェア) 画像のファイル形式、拡張子が変わると、性能が変わると思うのですが、ファイル名の「jpg、png、do 8 2022/08/10 13:37
- Excel(エクセル) excelで検索した商品の画像(ネットワーク上の)を表示させたい。 3 2023/06/28 00:32
- Access(アクセス) CSVファイルの「0落ち」にVBA 6 2023/02/02 15:27
- Visual Basic(VBA) エクセルVBA 4 2022/05/14 00:51
- フリーソフト フォルダ、ファイル名の一括変換について 3 2023/03/16 09:23
- C言語・C++・C# C言語で 英文字のみからなる文字列、”Radar”、”WasItACatISaw”、”a”、””(空 5 2022/12/20 15:17
- PHP 画像ファイルの名前をそのままURLにする 3 2022/10/16 11:18
- Excel(エクセル) セルを参照して条件で値をコピーする 3 2023/02/08 17:45
- Excel(エクセル) エクセルのVBAについて とあるサイトのコードを参考に、CSVの文字化けを直すVBAを作成しているの 7 2022/11/04 14:15
関連するカテゴリからQ&Aを探す
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
コマンドプロンプトの「%1」と...
-
コマンドプロンプトで変数が数...
-
バッチファイルで、iniファイル...
-
バッチコマンドでファイル名の...
-
コマンドプロンプトでファイル...
-
[DOS] コピー先に同じファイル...
-
ftp処理でmove(移動)を行いたい
-
【バッチファイル】forコマンド...
-
VBA GetAttrについて教えてくだ...
-
ExcelVBAのDirでスペース含むフ...
-
【Access】エクスポート時のフ...
-
フォルダ内の更新日時が一番新...
-
VB6.0 Dir関数について
-
ファイル名に ” を使うと エク...
-
ファイルの削除でゴミ箱に送りたい
-
【VBScript】※渡したい変数のみ...
-
■ファイルのリネーム(rename)...
-
ExifToolでの文字化け対策
-
access,vbaでフォルダ内のファ...
-
サブフォルダからファイルをコ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
コマンドプロンプトの「%1」と...
-
コマンドプロンプトで変数が数...
-
コマンドプロンプトでファイル...
-
バッチファイルで、iniファイル...
-
[DOS] コピー先に同じファイル...
-
バッチコマンドでファイル名の...
-
ftp処理でmove(移動)を行いたい
-
access,vbaでフォルダ内のファ...
-
ExcelVBAのDirでスペース含むフ...
-
フォルダ内の更新日時が一番新...
-
DOSのバッチ作成について‐FORの...
-
word VBA ファイル名 保存
-
ファイル名に ” を使うと エク...
-
.batでファイル名から抽出して...
-
ファイル名を該当フォルダ内か...
-
サブフォルダからファイルをコ...
-
【vbs】ファイル名の検索と該当...
-
【DOSバッチ開発】末尾のタブの...
-
VBA GetAttrについて教えてくだ...
-
バッチ処理で16進数でファイル...
おすすめ情報