Application.ProjectCheckOut метод (Project)

Извлекает открытый проект, если он активен.

Синтаксис

выражение. ProjectCheckOut (Имя)

выражение: переменная, представляющая объект Application.

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
Name	Необязательно заполнять.	String	Название проекта

Возвращаемое значение

Boolean

Примечания

Для работы метода ProjectCheckOut должен быть активен открытый проект. Если проект уже выдан, в приложении Project отобразится диалоговое окно с сообщением об ошибке "Этот проект уже выдан вам на другом компьютере или в сеансе Project Web App". Если проект извлекается другим пользователем, отображается сообщение об ошибке «Для проверки DOMAIN\UserName должен закрыть проект в своем сеансе или обратиться к администратору для проверки проекта».

Пример

В следующем примере предпринимается попытка проверки всех проектов, открытых только для чтения.

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

См. также

Объект приложения: метод Project.Checkin

IsCheckedOut —свойство Project.CheckoutProject — метод

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.