PRJ98 : Le calcul de la planification et l’Index de Performance des coûts

Résumé

Microsoft Project ne calcule pas l’Index de performances de planification (SPI) ou l’Index de performances de coûts (IPC). Cet article contient un exemple de macro qui calcule les index SPI et les CPI pour chaque tâche dans un projet.

REMARQUE: IPP est le rapport entre le travail effectué et le travail planifié (CBTE/CBTP). IPC est le rapport entre les coûts budgétés et les coûts réels (CBTE/CRTE).

Plus d'informations

Microsoft fournit des exemples de programmation à titre d'illustration uniquement, sans garantie expresse ou implicite. Ceci inclut, mais n'est pas limité à, les garanties implicites de qualité marchande ou d'adéquation à un usage particulier. Cet article suppose que vous êtes familiarisé avec le langage de programmation présenté et les outils utilisés pour créer et déboguer des procédures. Les ingénieurs du support technique Microsoft peuvent vous expliquer les fonctionnalités d'une procédure particulière, mais ils ne modifieront pas ces exemples pour fournir des fonctionnalités supplémentaires ou créer des procédures répondant à vos besoins spécifiques.
La macro suivante calcule l’Index de performances de planification (SPI) et l’Index de performances coûts (CPI) pour chaque tâche et place les résultats dans un champ numérique. Le SPI pour chaque tâche est égal à CBTE/CBTP. L’IPC pour chaque tâche est égale à CBTE/CRTE.

Pour créer cette macro, procédez comme suit :
  1. Dans le menu Outils , pointez sur Macro, puis cliquez sur Macros. Pour Project 2010, cliquez sur l’onglet affichage , puis cliquez sur le bouton Macros .
  2. Dans la zone nom de la Macro , tapez CalcSPI_CPI, puis cliquez sur créer pour ouvrir l’éditeur Visual Basic.
  3. Créez la macro en tapant la sous-routine suivante.
    Sub CalcSPI_CPI()Dim t As Task
    For Each t In ActiveProject.Tasks
    If Not t Is Nothing Then
    If t.BCWS <> 0 Then
    t.Number10 = t.BCWP / t.BCWS 'this calculates SPI
    End If
    If t.ACWP <> 0 Then
    t.Number11 = t.BCWP / t.ACWP 'this calculates CPI
    End If
    End If
    Next t
    End Sub


    REMARQUE: cet exemple utilise les champs Numéro10 et Numéro11. Vous pouvez utiliser les autres numériques et alphanumériques champs disponibles. Vous pouvez également utiliser la fonction Format pour mettre en forme les résultats.
  4. Dans Visual Basic Editor, dans le menu fichier , cliquez sur Fermer et retourner à Microsoft Project.
  5. Dans Microsoft Project, dans le menu Outils , pointez sur Macro, puis cliquez sur Macros. Pour Project 2010, cliquez sur l’onglet affichage , puis cliquez sur le bouton Macros .
  6. Dans la liste des macros, cliquez sur CalcSPI_CPI. Cliquez sur exécuter.
Pour afficher les résultats de la macro, insérez le champ Numéro10 et Numéro11 dans une table de tâches. Pour ce faire, procédez comme suit :

  1. Dans le menu Insertion , cliquez sur colonne. Pour Project 2010, cliquez sur l’onglet Format , puis cliquez sur le bouton Insérer la colonne .
  2. Dans la liste nom de champ , cliquez sur Numéro10.
  3. Cliquez sur OK.
  4. Répétez les étapes 1 à 3 pour le champ Numéro11.
Propriétés

ID d'article : 209115 - Dernière mise à jour : 8 janv. 2017 - Révision : 1

Commentaires