摘要
Microsoft Project不會計算 SPI (的排程) 或成本績效 (指數) 。 本文包含一個範例宏，可計算專案中每個任務的 SPI 和 KPI。
注意： SPI 是 BCWP/BCWS (中已執行的工作) 。 消費者總指數是 BCWP/ACWP (預算成本與實際成本) 。
更多資訊
注意事項：Microsoft 僅提供圖例的程式設計範例，而不提供明示或隱含的擔保。 這包括但不限於默示的可交易性擔保或適合特定用途的擔保。 本文假設您熟悉所示範的程式設計語言，以及用來建立及偵錯工具的工具。 Microsoft 支援工程師可協助說明特定程式的功能，但他們不會修改這些範例以提供新增功能或建構程式，以滿足您的特定需求。
下列宏會計算每個任務的排程 (SPI) 和成本績效指數 (消費者) ，將結果放入數值欄位。 每個任務的 SPI 等於 BCWP/BCWS。 每個任務的消費者總指數等於 BCWP/ACWP。
若要建立此宏，請遵循下列步驟：
-
在 [工具] 功能表上，指向 [巨集]，然後按一下 [巨集]。 若要Project 2010，請前往 [視圖>選項卡，然後按一下[宏>按鈕。
-
在 [宏名稱CalcSPI_CPI中，輸入 「CalcSPI_CPI」，然後按一下 [建立Visual Basic編輯器。
-
輸入下列子宏以建立宏。
Sub CalcSPI_CPI() 將 t 調暗為工作
針對 ActiveProject.Tasks 中的每個 t
如果 not not 是無，則
如果 t.BCWS <> 0 Then
t.Number10 = t.BCWP / t.BCWS '這會計算 SPI
結束 If
如果 t.ACWP <> 0 Then
t.Number11 = t.BCWP / t.ACWP '這會計算消費者
結束 If
結束 If
下一個 t
End Sub
NOTE：此範例使用 Number10 和 Number11 欄位。 您可以使用任何其他可用的數位和數位欄位。 您可能也想要使用 Formatfunct 函數來格式化結果。 -
在 [Visual Basic編輯器中，按一下 [檔案> 功能表上的 [關閉並返回Microsoft Project。
-
在 Microsoft Project 中，指向[工具Microsoft Project 功能表上的[宏，然後按一下[宏> 。 若要Project 2010，請前往 [視圖>選項卡，然後按一下[宏>按鈕。
-
在宏清單中，按一下[CalcSPI_CPI。 按一下 [執行]。
若要查看宏的結果，請將 Number10 和 Number11 欄位插入工作表格中。 若要這麼做，請按照下列步驟進行：
-
在 [插入>功能表上，按一下 [欄。
針對 Project 2010，請前往 [格式索引索引鍵並按一下 [插入欄>按鈕。 -
在 [功能變數名稱>清單中，按一下[Number10.
-
按一下 [確定]。
-
針對 Number11 欄位重複步驟 1-3。
