Workbook.CheckIn-Methode (Excel)
Gibt eine Arbeitsmappe von einem lokalen Computer an einen Server zurück und legt für die lokale Arbeitsmappe einen Schreibschutz fest, sodass sie nicht lokal bearbeitet werden kann. Durch das Aufrufen dieser Methode wird die Arbeitsmappe auch geschlossen.
Syntax
Ausdruck. CheckIn (SaveChanges, Comments, MakePublic)
expression Eine Variable, die ein Workbook-Objekt darstellt.
Parameter
| Name | Erforderlich/Optional | Datentyp | Beschreibung |
|---|---|---|---|
| SaveChanges | Optional | Variant | True, Änderungen werden gespeichert und in das Dokument überprüft. False gibt das Dokument auf einen Status eingecheckt ohne Überarbeitungen speichern. |
| Kommentare | Optional | Variant | Ermöglicht es dem Benutzer, für die Revision der einzucheckenden Arbeitsmappe Kommentare zum Einchecken einzugeben (gilt nur, wenn SaveChanges dem Wert True entspricht). |
| MakePublic | Optional | Variant | Beim Wert True wird dem Benutzer ermöglicht, die Arbeitsmappe zu veröffentlichen, nachdem diese eingecheckt wurde. Dadurch wird die Arbeitsmappe für den Genehmigungsprozess gesendet, was möglicherweise dazu führen kann, dass eine Version der Arbeitsmappe für Benutzer veröffentlicht wird, die nur über den Lesezugriff für die Arbeitsmappe verfügen (gilt nur, wenn SaveChanges dem Wert True entspricht). |
Beispiel
In diesem Beispiel wird der Server überprüft, um zu ermitteln, ob die angegebene Arbeitsmappe eingecheckt werden kann. Wenn dies der Fall ist, speichert und schließt der Code die Arbeitsmappe und checkt sie wieder auf dem Server ein.
Sub CheckInOut(strWkbCheckIn As String)
' Determine if workbook can be checked in.
If Workbooks(strWkbCheckIn).CanCheckIn = True Then
Workbooks(strWkbCheckIn).CheckIn
MsgBox strWkbCheckIn & " has been checked in."
Else
MsgBox "This file cannot be checked in " & _
"at this time. Please try again later."
End If
End Sub
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.