Ajakava ja kulujõudluse indeksi arvutamine Microsoft Project

Kokkuvõte

Microsoft Project ei arvuta funktsiooni Schedule Performance Index (SPI) ega kulujõudluse indeksit (CPI). See artikkel sisaldab näidismakrot, mis arvutab iga projektiülesande SPI- ja CPI-d.

MÄRKUS. SPI on tehtud töö ja ajastatud töö suhe (BCWP/BCWS). CPI on eelarvestatud kulude ja tegelike kulude suhe (BCWP/ACWP).

Lisateave

MÄRKUS. Microsoft pakub programmeerimisnäiteid ainult illustratsiooniks, ilma et see oleks väljendatud ega kaudse garantiiga. See hõlmab kaudseid kaubastatavuse või teatud otstarbeks sobivuse garantiisid, kuid ei piirdu sellega. Selles artiklis eeldatakse, et olete tuttav programmeerimiskeelega, mida demonstreeritakse, ning tööriistadega, mida kasutatakse protseduuride loomiseks ja silumiseks. Microsofti tugitehnikud saavad aidata selgitada konkreetse protseduuri funktsionaalsust, kuid nad ei muuda neid näiteid, et pakkuda teie konkreetsetele nõuetele vastamiseks lisafunktsioone ega koostada toiminguid. 

Järgmine makro arvutab iga ülesande jaoks ajakavajõudluse indeksi (SPI) ja kulujõudluse indeksi (CPI) ning asetab tulemid arvväljadele. Iga ülesande SPI on võrdne BCWP/BCWS-iga. Iga ülesande CPI on võrdne BCWP/ACWP-ga.

Selle makro loomiseks tehke järgmist.

1. Osutage menüüs Tööriistad käsule Makroja seejärel klõpsake käsku Makrod. Kui Project 2010, avage menüü Vaade ja klõpsake nuppu Makrod.

2. Tippige väljale Makro nimi tekst "CalcSPI_CPI", seejärel klõpsake nuppu Loo, et avada Visual Basic redaktor.

3. Makro loomiseks tippige järgmine alamroutiin.

   
   Sub CalcSPI_CPI() Dim t As Task
   Iga t ActiveProject.Tasks
     Kui t pole midagi,
   siis     Kui t.BCWS <> 0 Siis
           t.Number10 = t.BCWP / t.BCWS 'this calculates SPI
       Lõpeta kui
       Kui t.ACWP <> 0 Siis
           t.Number11 = t.BCWP / t.ACWP 'see arvutab CPI
       Lõpeta kui
     Lõpeta kui
   Järgmine t
   Lõpu
   
   alammärkus. Selles näites kasutatakse välju Arv10 ja Arv11. Saate kasutada mis tahes muud saadaolevat arvulist ja tähtnumbrilist välja. Võimalik, et soovite tulemite vormindamiseks kasutada funktsiooni Formatfunction.

4. Klõpsake Visual Basic menüü Fail käsku Sule ja naase Microsoft Project.

5. Valige Microsoft Project Menüü Tööriistad käsk Makro ja seejärelklõpsake käsku Makrod. Kui Project 2010, avage menüü Vaade ja klõpsake nuppu Makrod.

6. Klõpsake makrode loendis nuppu CalcSPI_CPI. Klõpsake nuppu Käivita.

Makro tulemite vaatamiseks sisestage ülesandetabelisse väli Arv10 ja Arv11. Selleks tehke järgmist.

1. Klõpsake menüüs Lisa nuppu Veerg.
   
   Kui Project 2010, avage menüü Vorming ja klõpsake nuppu Lisa veerg.

2. Klõpsake loendis Välja nimi väärtust Arv10.

3. Klõpsake nuppu OK.

4. Korrake juhiseid 1–3 väljal Number11.