Метод Document.CheckInWithVersion (Word)
Сохраняет документ на сервере с локального компьютера и задает локальный документ только для чтения, чтобы его нельзя было редактировать локально.
Синтаксис
выражение. CheckInWithVersion( _SaveChanges_ , _Comments_ , _MakePublic_ , _VersionType_ )
Выражение Переменная, представляющая объект Document .
Параметры
| Имя | Обязательный или необязательный | Тип данных | Описание |
|---|---|---|---|
| Savechanges | Необязательный | Логический | Значение true , чтобы сохранить документ на сервере. По умолчанию используется значение True. |
| Comments | Необязательный | Variant | Примечания к редакции документа, который возвращается (применяется только в том случае, если для параметра SaveChanges задано значение True). |
| MakePublic | Необязательный | Логический | Значение true , чтобы разрешить пользователю опубликовать документ после его возврата. |
| VersionType | Необязательный | Variant | Указывает сведения об использовании версий для документа. |
Замечания
Если для параметра MakePublic задано значение True , документ отправляется для утверждения, что в конечном итоге может привести к публикации версии документа для пользователей с правами только на чтение документа (применяется только в том случае, если для параметра SaveChanges задано значение True).
Чтобы воспользоваться преимуществами функций совместной работы, встроенных в Microsoft Word, документы должны храниться на сервере Microsoft SharePoint Server.
Пример
В следующем примере метод CanCheckin используется для определения того, сохранен ли документ на сервере Microsoft SharePoint Server. Если документ хранится на сервере, в примере вызывается метод CheckInWithVersion для возврата документа вместе с указанными комментариями и номером версии, сохранения изменений в расположении сервера и отправки документа для процесса утверждения.
Этот пример предназначен для настройки на уровне документа.
Private Sub DocumentCheckIn()
If ActiveDocument.CanCheckin Then
ActiveDocument.CheckInWithVersion _
True, _
"My updates.", _
True, _
WdCheckInVersionType.wdCheckInMinorVersion
Else
MessageBox.Show ("This document cannot be checked in")
End If
End Sub
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.