Application.ProjectCheckOut method (Project)

Checkt ein geöffnetes Projekt aus, wenn es sich um das aktive Projekt handelt.

Syntax

Ausdruck. ProjectCheckOut(Name)

expression Eine Variable, die ein Application-Objekt darstellt.

Parameter

Name Erforderlich/Optional Datentyp Beschreibung
Name Optional String Der Name des Projekts

Rückgabewert

Boolean

Bemerkungen

Ein geöffnetes Projekt muss aktiv sein, damit die ProjectCheckOut-Methode funktioniert. Wenn das Projekt bereits ausgecheckt ist, zeigt Project ein Dialogfeld mit der Fehlermeldung "Dieses Projekt ist bereits auf einem anderen Computer oder einer anderen Project Web App-Sitzung ausgecheckt" an. Wenn das Projekt von einem anderen Benutzer ausgecheckt ist, lautet die Fehlermeldung "Zum Auschecken muss DOMAIN\UserName das Projekt in seiner Sitzung schließen oder sich an Ihren Administrator wenden, um das Projekt einzuchecken."

Beispiel

Im folgenden Beispiel wird versucht, alle Projekte auszuchecken, die schreibgeschützt geöffnet sind.

Sub TestProjectCheckOut()
    Dim openProjects As Projects
    Dim proj As Project
    
    Set openProjects = Application.Projects
    
    On Error Resume Next
    
    For Each proj In openProjects
        If Application.IsCheckedOut(proj.Name) Then
            If proj.Type = pjProjectTypeEnterpriseCheckedOut Then
                Debug.Print "'" & proj.Name & "'" & " is already checked out."
            ElseIf proj.Type = pjProjectTypeNonEnterprise Then
                Debug.Print "'" & proj.Name & "'" & " is not an enterprise project."
            End If
        Else
            ' Check out the project only if it is the active project.
            proj.Activate
            Application.ProjectCheckOut
            Debug.Print "Attempted to check out: '" & proj.Name & "'"
        End If
    Next proj
End Sub

Siehe auch

Application ObjectProject.Checkin Method

IsCheckedOut-EigenschaftProject.CheckoutProject-Methode

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.