Propriété Resource.MaxUnits (Project)

Obtient ou définit la disponibilité maximale de la ressource en pourcentage. Variant en lecture/écriture.

Syntaxe

expression. MaxUnits

Expression Variable qui représente un objet Resource .

Remarques

La disponibilité en pourcentage est spécifiée dans la colonne Unités de la ligne active dans la grille Disponibilité des ressources de la boîte de dialogue Informations sur la ressource. La ligne active est celle où la plage de dates entre les colonnes Disponible à partir de et Disponible jusqu’au inclut la date du jour.

La propriété MaxUnits ne renvoie aucune information utile pour les ressources matérielles. La définition d’une valeur renvoie une erreur récupérable (code d’erreur 1101) lorsque cette propriété est appliquée à des ressources matérielles.

Exemple

L’exemple suivant montre comment affecter à la capacité maximale de chaque ressource du projet actif un nombre spécifié par l’utilisateur.

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

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.