Workbook.CheckIn-Methode (Excel)

  • Artikel

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.