[解決済み] あるディレクトリから別のディレクトリにファイルをコピーするVBA

質問

私は、定期的に別のディレクトリにコピーする必要があるアクセスファイルを持っており、最後のバージョンを置き換える必要があります。 Excelのマクロを使ってこれを実現したいのですが、その過程でファイルの名前も変更したいです。

例

   fileName = "X:\Database\oldName.accdb"
   copyDestination = "Y:\dbstore\"
   newName = "newName.accdb"

簡単にできる方法はないでしょうか？

どのように解決するのですか？

Scripting.FileSystemObjectの適切なメソッドを使用してください。そうすれば、あなたのコードは、VBScriptやVB.netへの移植性が高くなります。まず始めに、インクルードする必要があります。

Dim fso As Object
Set fso = VBA.CreateObject("Scripting.FileSystemObject")

そうすると

Call fso.CopyFile(source, destination[, overwrite] )

ここで、source と destination はファイルのフルネーム（パスを含む）です。

参照 https://docs.microsoft.com/en-us/office/vba/Language/Reference/user-interface-help/copyfile-method