Посмотрите видео ниже, чтобы узнать, как установить наш сайт в виде веб-приложения на главном экране.
Примечание: Эта функция может быть недоступна в некоторых браузерах.
Вы используете устаревший браузер. Этот и другие сайты могут отображаться в нем неправильно. Необходимо обновить браузер или попробовать использовать другой.
Sub SaveAsVersion12()
Dim so As New StructSaveAsOptions
If ActiveDocument Is Nothing Then Exit Sub
so.Filter = cdrCDR: so.Version = cdrVersion12
ActiveDocument.SaveAs ActiveDocument.FullFileName, so
End Sub
это надо повесить на CtrlS. Если вызывается для только что созданного, еще не созраненного файла, то спросит имя в стандартном окне сохранения, и там придется выставить версию вручную, ну а если файл уже имеет имя на диске, то без вопросов действует как стандартное созранение в 12-ю версию
На данном сайте используются cookie-файлы, чтобы персонализировать контент и сохранить Ваш вход в систему, если Вы зарегистрируетесь.
Продолжая использовать этот сайт, Вы соглашаетесь на использование наших cookie-файлов.