Freigeben über


Application.AddResourcesFromProjectServer-Methode (Project)

Öffnet das Dialogfeld Team erstellen , wenn Sie mit Project Server verbunden sind und sich derzeit in einer Ressourcenansicht befinden.

Syntax

Ausdruck. AddResourcesFromProjectServer

expression Eine Variable, die ein Application-Objekt darstellt.

Rückgabewert

Boolesch

Bemerkungen

Die AddResourcesFromProjectServer -Methode ist nur in Ressourcenansichten verfügbar und wird ein auffangbarer Fehler (Fehlercode 1100) Wenn Sie in einer Ressourcenansicht angewendet wird.

Beispiel

Im folgenden Beispiel wird das Dialogfeld Ein Team aus Project Server zusammenstellen angezeigt. Zuerst wird von Project die in Zusammenarbeitsoptionen (Menü Zusammenarbeit) angegebene URL der Liste vertrauenswürdiger Sites von Microsoft Internet Explorer hinzugefügt. Nach der Bestätigung wechselt Project zu einer Ressourcenblattansicht und zeigt das Dialogfeld Team aus Project Server erstellen an, wenn es im Arbeitsgruppenmodus mit "Mein Computer" verbunden ist. Project zeigt das Dialogfeld Team aus Projektname erstellen an, wenn eine Verbindung mit Project Server hergestellt wird.

Sub AddResources() 
   If Projects.Count = 0 Then 
      MsgBox "You must have at least one active project open." 
      Exit Sub 
   End If 
 
   If ActiveProject.ServerURL = "" Then 
      MsgBox "A Project Server URL has not been " _ 
         & "specified." & Chr(13) & "Click OK to select " _ 
         & "'Collaborate Using Project Server' and " _ 
         & "specify a valid URL in the Options dialog box " _ 
         & "(Tools menu)." 
      Application.OptionsWorkgroup 
   Else 
      ActiveProject.MakeServerURLTrusted 
      ViewApply Name:="Resource Sheet" 
      Application.AddResourcesFromProjectServer 
   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.