Как сохранить Excel файл из Office 365 с истёкшей лицензией?

В меню Excel сохранение задисейблено из-за того, что лицензия Office 365 отозвана.

скриншот меню

Есть ли какой-то способ сохранить файл?

Попробовал через vba-макрос

Sub Macro1()
  ActiveWorkbook.SaveAs FileName:="/Users/di-256/plan.xlsx"
  'ActiveWorkbook.SaveAs FileName:="/Users/user/smth.ods", FileFormat:=XlFileFormat.xlOpenDocumentSpreadsheet
End Sub

Но получил ошибку:

скриншот ошибки


Ответы (1 шт):

Автор решения: Roman C

Используйте clipboard для сохранения страницы. Ctrl-A выбирает всё содержимое, Ctrl-C копирует его в буфер обмена, после этого данные можно получить из clipboard в любом приложении, например Notepad. Конечно, код при этом не сохраняется, но его можно сохранить отдельно, таким же способом.

→ Ссылка