Propriété Task.PercentComplete (Project)
Obtient ou définit le pourcentage d’avancement d’une tâche. Variant en lecture/écriture.
Syntaxe
expression. PercentComplete
Expression Variable qui représente un objet Task .
Exemple
L’exemple suivant montre comment supprimer une ressource des tâches qui disposent de deux ou plusieurs ressources et d’un pourcentage d’avancement de 85.
Sub ReallocateResource()
Dim Entry As String ' The name of the resource to remove
Dim T As Task ' The task object used in For loop
Dim RA As Assignment ' The resource assignment object to the task
Entry = InputBox$("Enter a resource name:")
' Remove the resource from 85 percent complete tasks with 2+ resources.
For Each T In ActiveProject.Tasks
If T.PercentComplete >= 85 And T.Resources.Count >= 2 Then
For Each RA In T.Assignments
If UCase(Entry) = UCase(RA.ResourceName) Then
RA.Delete
End If
Next
End If
Next T
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.
Commentaires
https://aka.ms/ContentUserFeedback.
Bientôt disponible : Tout au long de 2024, nous allons supprimer progressivement GitHub Issues comme mécanisme de commentaires pour le contenu et le remplacer par un nouveau système de commentaires. Pour plus d’informations, consultezEnvoyer et afficher des commentaires pour