boxing_dayのプロフィール
@boxing_day boxing_day
ありがとう数2
質問数1
回答数1
- ベストアンサー数
- 1
- ベストアンサー率
- 100%
- お礼率
- 100%
- 登録日2006/11/01
- VBAでExcelのセルの一覧からファイル名の変更が
こんにちは。会社で大量のファイル名を変更していますが、Excelで一覧からを変更できれば能率的なので作っていますが、困っています。下記のものです。 Sub リネーム() Dim i As Long Dim NEWファイル As String Dim OLDファイル As String Dim パス As String For i = 1 To Range("B65536").End(xlUp).Row パス = Cells(2, 1).Value OLDファイル = パス & Cells(i, 2).Value NEWファイル = パス & Cells(i, 3).Value If Dir(OLDファイル) <> "" Then Name OLDファイル As NEWファイル End If Next i End Sub ※A2にはC:\Documents and Settings\M.Co,\デスクトップ\リネームと入っています。B1には変更前の001.jpg、C1には変更するa-1.jpgとファイル名が入っています。実行してもファイル名は変更されません。エラーもでません。よろしくお願いします。
- ベストアンサー
- cocoku
- その他(プログラミング・開発)
- 回答数1