Resource.MaxUnits property (Project)
Ruft ab oder legt die maximale prozentuale Verfügbarkeit der Ressource. Variant mit Lese-/Schreibzugriff.
Syntax
Ausdruck. MaxUnits
Ausdruck Eine Variable, die ein Resource-Objekt darstellt.
Hinweise
Der Prozentsatz der Verfügbarkeit wird in der Spalte Einheiten der aktuellen Zeile im Raster Ressourcenverfügbarkeit im Dialogfeld Informationen zur Ressource angegeben. Die aktuelle Zeile ist die Zeile, die im Terminbereich zwischen den Spalten Verfügbar von und Verfügbar bis das aktuelle Datum enthält.
Die MaxUnits -Eigenschaft gibt nicht für Ressourcen der Art Material sinnvollen Informationen zurück. Festlegen eines Werts wird ein auffangbarer Fehler (Fehlercode 1101) Wenn Sie auf Ressourcen der Art Material angewendet.
Beispiel
Im folgenden Beispiel wird die maximale Anzahl der Einheiten jeder Ressource des aktiven Projekts auf eine vom Benutzer angegebene Zahl festgelegt.
Sub SetDefaultMaxUnits()
Dim Entry As String ' Maximum units specified by user
Dim R As Resource ' Resource object used in loop
Entry = InputBox$("Enter the default maximum units for each resource.")
If IsNumeric(Entry) Then
For Each R In ActiveProject.Resources
R.MaxUnits = Entry
Next R
Else
MsgBox ("You didn't enter a numeric value.")
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.