サーバーに指定されたプレゼンテーションの PowerPoint をチェックできる場合は、 True を返します。
構文
expression。 CanCheckIn
式Presentation オブジェクトを表す変数。
戻り値
Boolean
注釈
PowerPoint に組み込まれているグループ作業機能を利用するには、プレゼンテーションを Microsoft SharePoint Portal Server に保存する必要があります。
例
この例では、指定したプレゼンテーションをチェックインできるかどうかサーバーをチェックし、チェックインできる場合はプレゼンテーションを閉じて、サーバーにチェックインし直します。
Sub CheckInPresentation(strPresentation As String)
If Presentations(strPresentation).CanCheckIn = True Then
Presentations(strPresentation).CheckIn
MsgBox strPresentation & " has been checked in."
Else
MsgBox strPresentation & " cannot be checked in " & _
"at this time. Please try again later."
End If
End Sub
上記のサブルーチンを呼び出すには、次のサブルーチンを使用し、" https://servername/workspace/report.ppt " ファイル名を上記の「解説」セクションで説明したサーバー上にある実際のファイルに置き換えます。
Sub CheckPPTIn()
Call CheckInPresentation(strPresentation:= _
"https://servername/workspace/report.ppt ")
End Sub
関連項目
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。