Примечание.
Для доступа к этой странице требуется авторизация. Вы можете попробовать войти или изменить каталоги.
Для доступа к этой странице требуется авторизация. Вы можете попробовать изменить каталоги.
Сохраняет книгу с локального компьютера на сервере и устанавливает для локальной книги режим только для чтения, чтобы ее нельзя было редактировать локально.
Синтаксис
выражение. CheckInWithVersion (SaveChanges, Comments, MakePublic, VersionType)
выражение Переменная, возвращающая объект книги .
Параметры
| Имя | Обязательный или необязательный | Тип данных | Описание |
|---|---|---|---|
| SaveChanges | Необязательный | Variant | Значение true , чтобы сохранить книгу на сервере. По умолчанию используется значение True. |
| Comments | Необязательный | Variant | Примечания к исправлению возвращаемой книги (применимо, только если для параметра SaveChanges установлено значение True). |
| MakePublic | Необязательный | Variant | Значение "true ", позволяющее пользователю опубликовать книгу после ее возвращения. |
| VersionType (Тип версии) | Необязательный | Variant | Указывает информацию о версиях для книги. |
Возвращаемое значение
Nothing
Примечания
Если для параметра MakePublic задать значение True , книга отправляется на утверждение, что в конечном итоге может привести к публикации версии книги для пользователей с правами только на чтение (применимо, только если для SaveChanges установлено значение True).
Чтобы воспользоваться преимуществами функций совместной работы, встроенных в Microsoft Excel, документы должны храниться на сервере Microsoft SharePoint Server.
Пример
В следующем примере метод CanCheckIn используется для определения того, хранилась ли книга на сервере Microsoft SharePoint Server. Если книга хранилась на сервере, в примере вызывается метод CheckInWithVersion для проверки книги вместе с указанными комментариями и номером версии, сохранения изменений в расположении сервера и отправки книги на утверждение.
Этот пример относится к настройке на уровне книги.
Private Sub WorkbookCheckIn()
If ThisWorkbook.CanCheckIn Then
ThisWorkbook.CheckInWithVersion True, "Changed sheet 1 and 2 etc...", True, XlCheckInVersionType.xlCheckInMinorVersion
Else
Msgbox "This workbook cannot be checked in"
End If
End Sub
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.