Kaip apskaičiuoti grafiko ir išlaidų efektyvumo indeksą Microsoft Project

Suvestinė

Microsoft Project neskaičiuoja tvarkaraščio našumo indekso (SPI) arba išlaidų efektyvumo indekso (CPI). Šiame straipsnyje yra makrokomandos pavyzdys, kuris apskaičiuoja KIEKVIENOS projekto užduoties SPI ir CPI.

PASTABA: SPI yra atlikto darbo ir suplanuoto darbo (BCWP/BCWS) santykis. CPI yra biudžeto išlaidų ir faktinių išlaidų (BCWP/ACWP) santykis.

Daugiau informacijos

PASTABA: "Microsoft" pateikia programavimo pavyzdžius tik iliustracijai, be išreikštos ar numanomos garantijos. Tai apima numanomas tinkamumo prekybai arba tinkamumo tam tikru tikslu garantijas, bet tuo neapsiribojant. Šiame straipsnyje daroma prielaida, kad esate susipažinę su demonstruotia programavimo kalba ir įrankiais, naudojamais procedūroms kurti ir derinti. "Microsoft" palaikymo inžinieriai gali padėti paaiškinti konkrečios procedūros funkcijas, tačiau jie nekeiskite šių pavyzdžių, kad galėtų teikti papildomas funkcijas arba kurti procedūras, kad atitiktų jūsų konkrečius reikalavimus. 

Ši makrokomanda apskaičiuoja kiekvienos užduoties tvarkaraščio našumo indeksą (SPI) ir išlaidų efektyvumo indeksą (CPI) ir rezultatus įdės į skaitinius laukus. Kiekvienos užduoties SPI lygus BCWP/BCWS. Kiekvienos užduoties CPI lygus BCWP/ACWP.

Norėdami sukurti šią makrokomandą, atlikite šiuos veiksmus:

1. Meniu Įrankiai nukreipkite žymiklį į Makrokomanda, tada spustelėkite Makrokomandos. Jei Project 2010", eikite į skirtuką Rodymas ir spustelėkite mygtuką Makrokomandos.

2. Lauke Makrokomandos pavadinimas įveskite "CalcSPI_CPI", tada spustelėkite Kurti, kad atidarytumėte Visual Basic rengyklę.

3. Sukurkite makrokomandą įvesdami toliau nurodytą poaplankių.

   
   Sub CalcSPI_CPI() Pritemd. Kaip užduotį
   Kiekvienam "ActiveProject" t.Tasks
     Jei ne nėra nieko, tada
       Jei t.BCWS <> 0 Tada
           t.Number10 = t.BCWP / t.BCWS "tai apskaičiuoja SPI
       Baigti, jei
       Jei t.ACWP <> 0 Tada
           t.Number11 = t.BCWP / t.ACWP "tai apskaičiuoja CPI
       Baigti, jei
     Baigti, jei
   Kitas t
   End Sub
   
   NOTE: Šiame pavyzdyje naudojami laukai Skaičius10 ir Skaičius11. Galite naudoti bet kurį kitą skaitinį ir raidinį-skaitinį lauką. Taip pat galite naudoti formatavimo parinktį, kad suformatuokite rezultatus.

4. Rengyklės Visual Basic meniu Failas spustelėkite Uždaryti ir grįžti į Microsoft Project.

5. Dalies Microsoft Project meniu Įrankiai nukreipkite žymiklį į Makrokomanda, tada spustelėkite Makrokomandos. Jei Project 2010", eikite į skirtuką Rodymas ir spustelėkite mygtuką Makrokomandos.

6. Makrokomandų sąraše spustelėkite CalcSPI_CPI . Spustelėkite Vykdyti.

Norėdami peržiūrėti makrokomandos rezultatus, į užduočių lentelę įterpkite lauką Skaičius10 ir Skaičius11. Norėdami tai padaryti, atlikite toliau aprašytus veiksmus.

1. Meniu Įterpimas spustelėkite Stulpelis.
   
   Jei Project 2010", eikite į skirtuką Formatas ir spustelėkite mygtuką Įterpti stulpelį.

2. Sąraše Lauko pavadinimas spustelėkite Skaičius10.

3. Spustelėkite Gerai.

4. Pakartokite 1–3 veiksmus su lauku Skaičius11.