Gráfico Velocímetro com Movimento

Veja como criar um gráfico de velocímetro com movimento no Excel.

No exemplo que criamos utilizamos VBA para alterar o valor do ponteiro até alcançar o valor do gráfico.

Este artigo foi uma sugestão do leitor Maurício, que questionou se seria possível criar o mesmo gráfico do artigo Gráfico de ponteiro Excel – Velocímetro de em movimento como no post Criar Gráfico em Movimento no Excel 2007 ou Excel 2010.

Como Inserir um Gráfico de Velocímetro no Excel

Para este efeito são utilizados dois gráficos 1 de Dispersão e outro de Rosca.

  • Primeiro crie a lista de dados conforme abaixo:
Planilha de Dados

Planilha de Dados

  • Com base nesta lista de dados crie um gráfico de rosca passando os dados conforme abaixo:
Seleção dos valores

Seleção dos valores

Seleção de dados do Gráfico 2
Seleção de dados do Gráfico 2
Dados do Gráfico
Dados do Gráfico
  • Para chegar no formato acima do gráfico você deverá fazer a rotação do gráfico, clicando com o botão direito no gráfico, clicando em Opções de Série, e no campo Opções de Série alterar o ângulo da primeira fatia para 90, ficando assim virado para baixo.
  • Depois selecione a parte em azul debaixo e altere o preenchimento para “Sem preenchimento”, e altere o contorno para “Sem linha”. Irá ficar conforme a figura abaixo:
Gráfico

Criando o gráfico de Dispersão

  • Crie uma lista de dados conforme abaixo, a partir da célula A15 até a célula B18.
Dados da Agulha
Dados da Agulha
  • Nas células A17 e B17 digite 0.
  • Na célula B6 Digite 8,5.
  • Na célula A18 digite =- COS(PI() * ABS($B$6 / $B$9))
  • Na célula B18 digite =SEN(PI() * ABS($B$6 / $B$9))
  • Adicione um novo gráfico, do tipo Dispersão e passe os valores conforme abaixo:
Dados do Gráfico de Agulha
  • Configure o Eixo Y para ter o valor máximo 1, o mínimo -1, e a unidade principal 0,1, isso é muito importante para o eixo ficar no meio. Para fazer isso clique com o botão direito sobre este eixo.
  • Altere o Eixo X para ter o valor máximo 1, o mínimo 0, e a unidade principal 0,1 para ficar correto o tamanho da agulha. Para fazer isso clique com o botão direito sobre este eixo.
  • Agora apague os campos do eixos X e Y assim como as linhas, o título e o nome da série, deixando conforme a figura abaixo:
Gráfico de Agulha

Gráfico de Agulha

  • Clique com o botão direito sobre um dos pontos e clique em Cor da Linha do Marcador mude para Automático, ele irá criar uma linha entre os pontos X e Y.
  • Clique em Fechar
  • Depois clique no extremo ponto da esquerda, clique com o botão direito em Formatar Ponto de Dados, clique no Opções de Marcador e marque como Interno e altere o tipo para círculo.
  • No outro extremo clique na marcação e em Opções de Marcador para Nenhum, ficando conforme abaixo:
Gráfico de Ponteiro

Gráfico de dispersão

  • Agora sobreponha os gráficos, configurando o gráfico de dispersão para que fique com o fundo transparente, depois basta agrupar os gráficos. O resultado final é o seguinte:
Gráfico de Ponteiro
Gráfico de Ponteiro

Incluir Movimento no Gráfico de Ponteiro

Primeiro você precisa habilitar as macros no Excel seguindo este tutorial do link.

Em seguida você pode colocar a animação do ponteiro conforme o VBA abaixo

Nele altere o campo de Gráfico 5 com o nome do seu gráfico e a célula B6 para a célula que tem o valor do ponteiro.

Public Sub lsAnimarPonteiro()
    Dim lValorTotal As Double
    Dim lAcrescimo  As Double

    ActiveSheet.ChartObjects("Gráfico 5").Activate

    lValorTotal = Range("B6").Value

    lAcrescimo = lValorTotal / 100

    Range("B6").Value = 0

    While Range("B6").Value < lValorTotal
        Range("B6").Value = Range("B6").Value + lAcrescimo
        Charts.Application.Calculate
    Wend

    Cells(1, 1).Select
End Sub

Com poucas alterações você poderá aplicar o mesmo gráfico em suas aplicações.

Download da Planilha de Gráfico com Movimento no Excel

Realize o download da planilha de gráfico com movimento no Excel deste artigo no botão abaixo. Basta se inscrever na nossa newsletter gratuita para o download automático.

Baixe a planilha


Marcos Rieper

Pai, marido, professor e consultor em Excel.

Obrigado por ler este artigo, este blog foi criado para difundir o conhecimento em Excel à todos.

Divulgamos novos artigos nas redes sociais, basta clicar nos ícones abaixo.

Excel não precisa ser complicado

Assine nossa newsletter e receba dicas práticas para dominar o excel