Como calcular o Índice de Desempenho de Cronograma e Custo no Microsoft Project

Resumo

Microsoft Project não calcula o Índice de Desempenho de Agendamento (SPI) ou o Índice de Desempenho de Custo (CPI). Este artigo contém uma macro de exemplo que calcula SPI e CPI para cada tarefa em um projeto.

OBSERVAÇÃO: SPI é a taxa de trabalho executado para o trabalho agendado (BCWP/BCWS). O CPI é a taxa de custos orçados para os custos reais (BCWP/ACWP).

Mais informações

OBSERVAÇÃO: A Microsoft fornece exemplos de programação apenas para ilustração, sem garantia expressa ou implícita. Isso inclui, mas não se limita às garantias implícitas de comercialização ou adequação a uma finalidade específica. Este artigo supõe que você está familiarizado com a linguagem de programação que está sendo demonstrada e com as ferramentas usadas para criar e depurar procedimentos. Os engenheiros de suporte da Microsoft podem ajudar a explicar a funcionalidade de um procedimento específico, mas não modificarão esses exemplos para fornecer funcionalidades adicionais ou procedimentos de construção para atender aos seus requisitos específicos. 

A macro a seguir calcula o Índice de Desempenho de Agendamento (SPI) e o Índice de Desempenho de Custo (CPI) para cada tarefa e coloca os resultados em campos numéricos. O SPI para cada tarefa é igual a BCWP/BCWS. O CPI de cada tarefa é igual a BCWP/ACWP.

Para criar essa macro, siga estas etapas:

1. No menu Ferramentas aponte para Macro e, em seguida, clique em Macros. Para Project 2010, vá até a guia Exibir e clique no botão Macros.

2. No campo Nome da macro, digite "CalcSPI_CPI", e clique em Criar para abrir a Visual Basic Editor.

3. Crie a macro digitando a sub-rotina a seguir.

   
   Sub CalcSPI_CPI() Dim t As Task
   Para Cada t em ActiveProject.Tasks
     If Not t Is Nothing Then
       Se t.BCWS <> 0,
           t.Number10 = t.BCWP / t.BCWS 'isso calcula SPI
       End If
       Se t.ACWP <> 0 Then
           t.Number11 = t.BCWP / t.ACWP 'isso calcula o CPI
       End If
     End If
   Próximo t
   End Sub
   
   OBSERVAÇÃO: este exemplo usa os campos Number10 e Number11. Você pode usar qualquer um dos outros campos numéricos e alfanuméricos disponíveis. Você também pode querer usar a função Formatfunction para formatar seus resultados.

4. No editor Visual Basic, no menu Arquivo, clique em Fechar e Retornar para Microsoft Project.

5. Em Microsoft Project, no menu Ferramentas, aponte para Macroe clique em Macros. Para Project 2010, vá até a guia Exibir e clique no botão Macros.

6. Na lista de macros, clique em CalcSPI_CPI. Clique em Executar.

Para exibir os resultados da macro, insira o campo Número10 e Número11 em uma tabela de tarefas. Para fazer isso, siga estas etapas:

1. No menu Inserir, clique em Coluna.
   
   Para Project 2010, vá para a guia Formatar e clique no botão Inserir Coluna.

2. Na lista Nome do campo, clique em Número10.

3. Clique em OK.

4. Repita as etapas 1 a 3 para o campo Número11.