VBA将文件从一个目录复制到另一个目录

Question

因此，我有一个访问文件，我经常需要将其复制到另一个目录中，以替换最新版本。我想使用Excel宏来实现此目的，并且还想在此过程中重命名文件。例如   fileName = "X:\Database\oldName.accdb"   copyDestination = "Y:\dbstore\"   newName = "newName.accdb"有一个简单的方法吗？

Answer 1

使用此代码时使我头疼的一件事（可能会影响其他人，我希望有人在此处留下这样的评论供我阅读）：

• 我的目的是创建一个动态访问仪表板，该仪表板需要更新其链接表。

• 我使用上述复制方法将现有链接的CSV替换为它们的更新版本。

• 从模块手动运行以上代码可以正常工作。

• 从链接到CSV数据的表单运行相同的代码会出现运行时错误70（权限被拒绝），即使我代码的第一步是关闭该表单（该表单也应该已解锁CSV文件，以便可以覆盖它）。

• 我现在相信，尽管该表单已关闭，但在执行与该表单相关联的VBA时，它会保持过期的CSV文件锁定。

我的解决方案是从与数据库一起打开的另一个隐藏表单中运行代码（按计时器事件）。

Answer 2

如果您可以选择较少的选项，则此方法甚至更容易：

FileCopy source, destination