Excel VBA 質問スレッド №1942 (解決済)

ファイルコピーと名前変更

投稿者 : なかの投稿日時 : 2024/06/24(Mon) 23:11:02 OS : Windows 10 EXCEL : Excel 2016

デスクトップフォルダにあるBOOK1.xlsmより、デスクトップフォルダにあるBOOK2.xlsxを
デスクトップフォルダ内にあるABCフォルダにコピーして名前変更を致したく、下記コードを作成しました

sub　macro1()

FileCopy ThisWorkbook.Path & "\Book2.xlsx", ThisWorkbook.Path & "\ABC\Book2_" & Format(Now, "yyyymmddhhmmss") & ".xlsx"

End　sub

EXCEL2016ではできるのですが、
他のバージョンだとエラーメッセージはでないのですが、止まってしまいます

コードを見る限り間違ってはいないと考えているのですが、
エラーが出ずに、コピーと名前変更をしたいのですがご教示頂けないでしょうか

お忙しい中恐れ入りますが、宜しくお願いします

[返信 1] Re : ファイルコピーと名前変更

投稿者 : さんこう投稿日時 : 2024/06/25(Tue) 09:21:32

別の方法を試してみてはいかがでしょうか。

参考になれば。

＜vba fso ファイルコピー＞
https://www.google.com/search?q=vba+fso+%E3%83%95%E3%82%A1%E3%82%A4%E3%83%AB%E3%82%B3%E3%83%94%E3%83%BC

[返信 2] Re : ファイルコピーと名前変更

投稿者 : さんこう投稿日時 : 2024/07/08(Mon) 22:24:09

いつも参考にならないさんこうですいません。

当掲示板について

Excel VBA に関する掲示板です。Excel VBA に関する質問や疑問、それに対する解決方法など気軽に投稿してください。
記事内ではHTMLのタグは使用できません。
記事は一度投稿すると修正できません。内容を訂正したい場合は返信で対応してください。
Sub〜End Sub、Function〜End Function は自動的にプログラムコードとみなし、枠で囲って見やすくします。
Excel VBA とは関係ないことや、他人が不快に思うようなことなど、管理人が適当でないと判断した記事は削除する場合があります。

返信入力フォーム

( 処理日時 : 2025-07-03 00:30:04 )