VBAを使用してファイルのリネームをできる物をつくってみました。