0

我有一个小程序，它创建大量文件并保存到用户指定的文件夹中。目前，初始化时的顶部userform如下所示：

在此处输入图像描述

我更喜欢如果用户形式打开以及选择“出现”对话框（通过目标按钮）已经显示了一般默认值时：

在此处输入图像描述

程序能否找到通向用户桌面的路径？

4

2 回答 2

3

要获取用户桌面的路径，请使用：

PathToDesktop = Environ("USERPROFILE") & "\Desktop"
于 2013-10-16T09:09:34.330 回答
3

如果您在 excel-vba 中执行此操作，则以下代码会将当前工作簿作为副本保存到用户桌面......您可能可以从那里弄清楚您在做什么。

Dim DesktopPath As String 
DesktopPath = CreateObject("WScript.Shell").SpecialFolders("Desktop") & Application.PathSeparator 
ActiveWorkbook.SaveAs DesktopPath & "filename.xls"
于 2013-10-16T09:07:54.550 回答