首页 > 解决方案 > 我可以使用 VBA 更改 Windows/Camera 保存新图像的位置吗

问题描述

我用 Excel VBA 制作了一个很好的电子表格,用于我们的建筑工地发展。它具有交互式按钮,并在 Windows Surface Pro 上运行。我用 Userforms 和 vba 函数完成了这一切。

其中一个按钮允许用户打开表面上的相机应用程序,以便在旅途中拍摄前进的照片。它运作良好,非常方便。虽然,窗口按日期将所有图片保存在同一文件夹中。

我想知道是否有任何方法可以使用 VBA 或可以与我的工作簿一起使用的东西来更改新的图像保存位置。这甚至可能吗?它默认保存在我的图片文件夹中。或者你们认为我的问题有什么解决方案。

感谢您的宝贵时间,非常感谢!

我用这个简单的宏打开我的相机。(为简单起见,我的桌面上有一个相机的快捷方式)

Sub Open_Camera()

Dim MyFile As String
Dim Cmd As String
MyFile = "C:\Users\Name\Desktop\Camera.lnk"
Cmd = "RunDLL32.EXE shell32.dll,ShellExec_RunDLL "
Shell (Cmd & MyFile)

End Sub

我希望它保存在我可以指定名称和日期的文件夹中。(如我的图片\Folder_Name_Date\Pictures。名称和日期信息在我的电子表格中。

标签: excelvba

解决方案


推荐阅读