【发布时间】:2015-09-04 14:12:18
【问题描述】:
我有一个用户表单,许多不同的用户都会打开并完成它。我希望用户表单在提交答案后保存到每个用户的桌面。
弹出消息框后,理想情况下工作簿应保存到用户桌面并关闭。这是我目前所拥有的,虽然它似乎不起作用:
answer3 = MsgBox("Please transfer $" & variable & " to:" & vbCr & "BSB: XXX-XXX" & vbCr & "Account Number: XXXX XXXX" & vbCr & "Account Name: XXX XXX")
ThisWorkbook.SaveAs((CreateObject("WScript.Shell").specialfolders("Desktop"))
ThisWorkbook.Close
任何想法,如何实现?
谢谢
【问题讨论】: