Метод Workbook.CheckInWithVersion (Excel)

Сохраняет книгу на сервере с локального компьютера и задает локальную книгу только для чтения, чтобы ее нельзя было изменить локально.

Синтаксис

expression. CheckInWithVersion (SaveChanges, Comments, MakePublic, VersionType)

выражение Переменная, возвращающая объект Workbook .

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
SaveChanges	Необязательный	Variant	Значение true , чтобы сохранить книгу на сервере. По умолчанию используется значение True.
Комментарии	Необязательный	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 и обратная связь.