Tóm tắt
Microsoft Project tính toán Chỉ mục Hiệu suất Lịch biểu (SPI) hoặc Chỉ mục Hiệu suất Chi phí (CPI). Bài viết này chứa macro mẫu tính toán SPI và CPI cho từng tác vụ trong một dự án.
LƯU Ý: SPI là tỷ lệ công việc được thực hiện theo lịch trình làm việc (BCWP/BCWS). CPI là tỷ lệ chi phí được lập ngân sách với chi phí thực tế (BCWP/ACWP).
Xem thêm thông tin
LƯU Ý:Microsoft cung cấp các ví dụ lập trình chỉ cho hình minh họa, mà không có bảo hành được thể hiện hoặc ngụ ý. This includes, but is not limited to, the implied warranties of merchantability or fitness for a particular purpose. Bài viết này giả định rằng bạn đã quen với ngôn ngữ lập trình đang được minh họa và với các công cụ được sử dụng để tạo và gỡ lỗi thủ tục. Các kỹ sư hỗ trợ của Microsoft có thể giúp giải thích chức năng của một quy trình cụ thể nhưng các quy trình này sẽ không sửa đổi các ví dụ này để cung cấp chức năng bổ sung hoặc quy trình xây dựng để đáp ứng các yêu cầu cụ thể của bạn.
Macro sau đây tính toán Chỉ mục Hiệu suất Lịch biểu (SPI) và Chỉ mục Hiệu suất Chi phí (CPI) cho từng tác vụ và đặt kết quả vào các trường Số. Spi cho mỗi tác vụ bằng BCWP/BCWS. CPI cho mỗi tác vụ bằng BCWP/ACWP.
Để tạo macro này, hãy làm theo các bước sau:
-
Trên menu Công cụ, trỏ đến Macro, rồi bấm vào Macro. Ví Project 2010, đi đến tab Xem, rồi bấm vào nút Macro.
-
Trong trường tên Macro, nhập "Mật CalcSPI_CPI", rồi bấm vào Tạo để mở Trình soạn Visual Basic thảo Macro.
-
Tạo macro bằng cách nhập thủ thuật con sau đây.
Sub CalcSPI_CPI() Dim t As Task
Đối với Mỗi mục trong ActiveProject.Tasks
If Not t Is Nothing Then
Nếu t.BCWS <> 0 Thì
t.Number10 = t.BCWP / t.BCWS 'điều này sẽ tính toán SPI
Kết thúc Nếu
Nếu t.ACWP <> 0 Thì
t.Number11 = t.BCWP / t.ACWP 'điều này sẽ tính CPI
Kết thúc Nếu
Kết thúc Nếu
Tiếp theo t
End Sub
NOTE: Ví dụ này sử dụng các trường Number10 và Number11. Bạn có thể dùng bất kỳ trường số và chữ số nào khác sẵn dùng. Bạn cũng có thể muốn sử dụng Chức năng định dạng để định dạng kết quả của mình. -
Trong Trình Visual Basic Thảo, trên menu Tệp, bấm vào Đóng và Quay lại Microsoft Project.
-
Trong Microsoft Project, trên menu Công cụ, trỏ tới Macro, rồi bấm vào Macro. Ví Project 2010, đi đến tab Xem, rồi bấm vào nút Macro.
-
Trong danh sách macro, bấm vàoCalcSPI_CPI. Bấm Chạy.
Để xem kết quả của macro, hãy chèn trường Number10 và Number11 vào bảng tác vụ. Để thực hiện điều này, hãy làm theo các bước sau:
-
Trên menu Chèn, bấm vào Cột.
Ví Project 2010, đi đến tab Định dạng, rồi bấm vào nút Chèn Cột. -
Trong danh sách Tên trường, bấm số10.
-
Bấm vào OK.
-
Lặp lại các bước 1-3 cho trường Number11.