Application.ManageSiteColumns-Methode (Project)

Artikel
04/07/2023

Zeigt das Dialogfeld Felder verwalten an, in dem integrierte und benutzerdefinierte Felder in einem lokalen Projekt mit bestimmten Spalten in einer SharePoint 2013-Vorgangsliste synchronisiert werden können.

Syntax

Ausdruck. ManageSiteColumns

Ausdruck Ein Ausdruck, der ein Application-Objekt zurückgibt.

Rückgabewert

Boolean

Bemerkungen

Die ManageSiteColumns -Methode steht nur in Project Professional mit einem lokalen Projekt, das in einer SharePoint-Aufgabenliste gespeichert wurde. Weitere Informationen finden Sie unter der SynchronizeWithSite -Methode.

Die folgende Tabelle zeigt die Spalten und synchronisierten Standardfelder im Dialogfeld Felder verwalten . Standardmäßig werden die SharePoint-Spalten Priorität und Vorgangsstatus nicht mit einem Projektfeld synchronisiert, sodass diese Elemente leer sind.

Synchronisieren	Projektfeld	SharePoint-Spalte
Ja	Name	Titel
Ja	Beginn	Startdatum
Ja	Ende	Fälligkeitsdatum
Ja	% Erledigt	% Erledigt
Ja	Ressourcennamen	Zugewiesen
Ja	Vorgänger	Vorgänger
Nein		Priorität
Nein		Vorgangsstatus

Beispiel

Um das Feld Priorität in der Spalte Projektfeld hinzuzufügen und mit der Spalte Priorität in SharePoint zu synchronisieren, versuchen Sie Folgendes:

Umbenennen eines benutzerdefinierten Textfelds im Projekt. beispielsweise den Namen Sie Text1SharePoint-Priorität.
Führen Sie die ManageSiteColumns -Methode, und wählen Sie dann im Dialogfeld Felder verwaltenSharePoint-Priorität (Text1) in der Project-Feld Dropdown-Liste, die Priorität in der SharePoint-Spalte entspricht.
Führen Sie das Makro syncpriority aus.

Sub SyncPriority() 
    Dim tsk As Task 
    Dim msfPriority As String 
 
    Application.SynchronizeWithSite 
 
    For Each tsk In ActiveProject.Tasks 
        msfPriority = tsk.Text1 
 
        Select Case msfPriority 
            Case "(1) High" 
               tsk.Priority = 700 
           Case "(2) Normal" 
               tsk.Priority = 500 
           Case "(3) Low" 
               tsk.Priority = 300 
        End Select 
    Next tsk 
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.

Freigeben über