我有一个小程序，它创建大量文件并保存到用户指定的文件夹中。目前，初始化时的顶部userform如下所示：
我更喜欢如果用户形式打开以及选择“出现”对话框（通过目标按钮）已经显示了一般默认值时：
程序能否找到通向用户桌面的路径？
问问题
98 次
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 回答