2015-09-04 5 views
1

У меня есть пользовательская форма, которую откроют и закончат множество разных пользователей. Я хочу, чтобы пользовательская форма сохранялась на рабочем столе каждого пользователя после отправки ответа.Excel Userform, Сохранить на рабочий стол

После того, как появится окно с сообщениями, книга в идеале должна быть сохранена на рабочем столе пользователя и закрыта. Это то, что у меня до сих пор, хотя оно, похоже, не работает:

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 

Любая идея, как этого достичь?

Благодаря

ответ

1

Ну, я не хочу сказать вам это, но вы на самом деле там пару дополнительных круглых скобках, за исключением ... эта линия должна быть, как это

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

Вы только положить скобку вокруг параметров для ваших объектов, когда вы устанавливаете их как объявленный объект переменной, как вы это делали для answer3.

Смежные вопросы