Freigeben über

Assignment.Overallocated property (Project)

  • Artikel

True, wenn eine Zuordnung überlastet ist. Schreibgeschützter boolescher Wert.

Syntax

Ausdruck. Overallocated

Ausdruck Eine Variable, die ein Assignment-Objekt darstellt.

Beispiel

Im folgenden Beispiel wird der Prozentsatz der überlasteten Ressourcen des aktiven Projekts angezeigt.

Sub DisplayOverallocatedPercentage() 
 
 Dim R As Resource ' Resource object used in For Each loop 
 Dim NOverallocated As Long ' Number of overallocated resources 
 
 For Each R In ActiveProject.Resources 
 If R.Overallocated Then NOverallocated = NOverallocated + 1 
 Next R 
 
 MsgBox (Str$((NOverallocated / ActiveProject.Resources.Count) * 100) _ 
 & " percent (" & Str$(NOverallocated) & "/" & Str$(ActiveProject.Resources.Count) _ 
 & ")" & " of the resources in this project are overallocated.") 
 
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.