Excel用户窗体,保存到桌面

我有一个用户表单,许多不同的用户将打开并完成。 我希望用户表单在提交答案后保存到每个用户的桌面。

popup一个消息框后,工作簿应理想地保存到用户的桌面并closures。 这是我迄今为止虽然似乎没有工作:

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 

任何想法,如何实现这一目标?

谢谢

那么我不想告诉你,但你实际上除了一些额外的括号外…这条线应该是这样的

 ThisWorkbook.SaveAs CreateObject("WScript.Shell").specialfolders("Desktop") 

当你将它们设置为一个声明的variables对象时,你只能在你的对象的参数周围放置括号。