Resumo
Microsoft Project calcula o Índice de Desempenho Agendado (SPI) ou o Índice de Desempenho de Custos (CPI). Este artigo contém uma macro de exemplo que calcula o SPI e o CPI para cada tarefa num projeto.
NOTA: SPI é a proporção do trabalho realizado para o trabalho agendado (BCWP/BCWS). PPP é o rácio dos custos orçamentados para os custos reais (BCWP/ACWP).
Mais Informações
NOTA: A Microsoft fornece exemplos de programação apenas para ilustração, sem garantia expressa ou implícita. Isto inclui, mas não se limita, às garantias implícitas de comerciante ou adequação a um fim específico. Este artigo assume que está familiarizado com a linguagem de programação que está a ser demonstrada e com as ferramentas utilizadas 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 irão modificar estes exemplos de forma a fornecer funcionalidades ou procedimentos de construção adicionados para satisfazer os seus requisitos específicos.
A macro seguinte calcula o Índice de Desempenho Agendado (SPI) e o Índice de Desempenho de Custos (CPI) para cada tarefa e coloca os resultados em campos numéricos. O SPI para cada tarefa é igual a BCWP/BCWS. A CPI para cada tarefa é igual a BCWP/ACWP.
Para criar esta macro, siga estes passos:
-
No menu Ferramentas, aponte para Macro e, em seguida, clique em Macros. Para Project 2010, vá para o separador Ver e clique no botão Macros.
-
No campo Nome da macro, escreva "CalcSPI_CPI" e, em seguida, clique em Criar para abrir o Visual Basic Editor.
-
Crie a macro ao escrever a seguinte sub-rotina.
Sub CalcSPI_CPI() Dim t As Task
Para Cada t No ActiveProject.Tasks
Se Não For Nada, então
Se o t.BCWS <> 0,
t.Number10 = t.BCWP / t.BCWS 'this calculate SPI
Terminar Se
Se t.ACWP <> 0,
t.Number11 = t.BCWP / t.ACWP 'this calculate CPI
Terminar Se
Terminar Se
Seguinte t
End Sub
NOTE: este exemplo utiliza os campos Number10 e Number11. Pode utilizar qualquer um dos outros campos numéricos e alfanuméricos disponíveis. Também poderá querer utilizar a Formatação para formatar os seus resultados. -
No Editor Visual Basic, no menu Ficheiro, clique em Fechar e Voltar a Microsoft Project.
-
No Microsoft Project, no menu Ferramentas, aponte para Macro e,em seguida, clique em Macros. Para Project 2010, vá para o separador Ver e clique no botão Macros.
-
Na lista de macros, clique em CalcSPI_CPI. Clique em Executar.
Para ver os resultados da macro, insira o campo Número10 e Número11 numa tabela de tarefas. Para fazê-lo, siga estes passos:
-
No menu Inserir, clique em Coluna.
Para Project 2010, vá para o separador Formatar e clique no botão Inserir Coluna. -
Na lista Nome do campo, clique em Número10.
-
Clique em OK.
-
Repita os passos de 1 a 3 para o campo Número11.