Код Excel VBA, чтобы сохранить как конкретное имя файла и закрыть активную книгу

Question

Какой код VBA мне нужно добавить в конец существующего подпрограммы, чтобы сохранить активную книгу как «finaloutput.xls» и затем автоматически закрыть книгу без сохранения изменений?

Answer 1

Вы можете использовать что-то простое, подобное этому, которое я поместил в другую книгу и выполнил из меню Инструменты ... Макросы (Alt + F8) после активации книги, которую нужно сохранить.

Public Sub SaveAsAndClose()

    ActiveWorkbook.SaveAs "finaloutput.xls"
    ActiveWorkbook.Close

End Sub