Resumé
Microsoft Project beregner ikke SPI (Schedule Performance Index) eller indekset for omkostningsydeevne (Cost Performance Index). Denne artikel indeholder en eksempelmakro, der beregner SPI og CPI for hver opgave i et projekt.
BEMÆRK! SPI er forholdet mellem udført arbejde og planlagt arbejde (BCWP/BCWS). CPI er forholdet mellem budgetterede omkostninger og faktiske omkostninger (BCWP/ACWP).
Flere oplysninger
BEMÆRK! Microsoft leverer kun programmeringsekseler som illustration uden garanti enten udtrykt eller underforstået. Dette omfatter, men er ikke begrænset til, stiltiende garantier for salgbarhed eller egnethed til et bestemt formål. I denne artikel antages det, at du er bekendt med det programmeringssprog, der demonstreres, og de værktøjer, der bruges til at oprette og til fejlfinding af procedurer. Microsoft-supportteknikere kan hjælpe med at forklare funktionaliteten i en bestemt procedure, men de vil ikke ændre disse eksempler for at levere ekstra funktionalitet eller konstruere procedurer, der opfylder dine specifikke krav.
Følgende makro beregner INDEKS (Schedule Performance Index) og CPI (Cost Performance Index) for hver opgave og placerer resultaterne i numeriske felter. SPI for hver opgave er lig med BCWP/BCWS. CPI for hver opgave er lig med BCWP/ACWP.
Hvis du vil oprette denne makro, skal du følge disse trin:
-
Peg på Makro i menuen Funktioner, og klik derefter på Makroer. For Project 2010 skal du gå til fanen Vis og klikke på knappen Makroer.
-
I feltet Makronavn skal du skrive "CalcSPI_CPI" og derefter klikke på Opret for at åbne Visual Basic Editor.
-
Opret makroen ved at skrive følgende underrutin.
Sub CalcSPI_CPI() Dim t As Task
For hvert t i ActiveProject.Tasks
If Not t Is Nothing Then
Hvis t.BCWS <> 0 Then
t.Number10 = t.BCWP / t.BCWS 'this calculates SPI
End If
Hvis t.ACWP <> 0 Then
t.Number11 = t.BCWP / t.ACWP 'this calculates CPI
End If
End If
Næste t
SlutunderNOTE: I dette eksempel bruges felterne Tal10 og Tal11. Du kan bruge et hvilket som helst af de andre tilgængelige numeriske og alfanumeriske felter. Du kan også bruge Formatfunktion til at formatere dine resultater. -
I Visual Basic i menuen Filer skal du klikke på Luk og vend tilbage Microsoft Project.
-
I Microsoft Project skal du i menuen Funktioner pege på Makroog derefter klikke på Makroer. For Project 2010 skal du gå til fanen Vis og klikke på knappen Makroer.
-
På listen over makroer skal du klikke på CalcSPI_CPI. Klik på Afspil.
Hvis du vil have vist resultaterne af makroen, skal du indsætte feltet Tal10 og Tal11 i en opgavetabel. Det kan du gøre ved at udføre disse trin:
-
I menuen Indsæt skal du klikke på Kolonne.
Du Project 2010 ved at gå til fanen Formatér og klikke på knappen Indsæt kolonne. -
Klik på Tal10 på listen Feltnavn.
-
Klik på OK.
-
Gentag trin 1-3 for feltet Tal11.