时间戳

首页 > 解决方案 > 将文件保存到特定文件夹

vba - 将文件保存到特定文件夹

问题描述

我正在寻找一个 vba 函数，它可以从电子邮件中保存和下载文件并将该 pdf 保存在特定文件夹下。是否有一些能够执行此功能的 vba 代码或功能。用户应该能够首先下载该文件，因此至少可以下载。他们只需要选择文件，它应该上传到正确的文件夹。

我试过寻找但在线只有代码可以在线上传文件。

我希望有办法做到这一点。我将感谢可以解决这个问题的传说。

标签： vbams-access

解决方案

由于文件的源位置是已知的（假设您正在提示用户选择要移动的文件），那么尽管您在问题中提到了三个截然不同的操作（“保存文件” / “下载文件” / “上传文件”），我相信任务纯粹是将文件移动到目标位置。

在 VBA 中完成此任务的最简单方法是使用Name语句，例如：

Dim srcFnm As String: srcFnm = "YourFile.pdf"
Dim srcPth As String: srcPth = "C:\YourSourceFolder"
Dim tarPth As String: tarPth = "C:\YourTargetFolder"

Name srcPth & "\" & srcFnm As tarPth & "\" & srcFnm

从文档中：

如果需要，该Name语句重命名文件并将其移动到不同的目录或文件夹。Name可以跨驱动器移动文件，但它只能重命名现有目录或文件夹，如果两者newpathname都oldpathname位于同一驱动器上。Name无法创建新文件、目录或文件夹。

请注意，最后一行“Name不能创建新文件、目录或文件夹。” ，因此您需要先确保目标文件夹存在，然后再尝试移动文件。

为此，您可以使用dir函数和mkdir函数的组合，例如：

If Dir(tarPth, vbDirectory) = vbNullString Then MkDir tarPth

推荐阅读