Grafico de Pareto Remover Dados quando for Zero

2024 - VBA & Macros

Post Recente por Fernando Fernandes 11 anos atrás

4 Posts

2 Usuários

0 Reactions

1,357 Visualizações

RSS

caje

(@caje)

Posts: 97

Trusted Member

Topic starter

Bom Dia a Todos do Fórum.
Não sei se estou postando na área correta porem meu gráfico contem macro.

Espero que possam me Ajudar.

O Problema é seguinte tenho uma Macro que gera 2 gráfico de pareto um anual e outro do período que seleciono ordenando as causas de acordo com qtde tudo certinho porém quando não tenho problema algum com determinada causa o gráfico puxa 0 o que gostaria que não fosse exibido no grafico.

Segue a Planilha de exemplo em Anexo.

Mas uma vez se alguém puder ajudar Agradeço.

Exemplo.zip

Postado : 25/10/2013 8:57 am

Fernando Fernandes

(@fernandofernandes)

Posts: 43750

Illustrious Member

Bom dia!
Para retirar os rótulos de dados com valores iguais a zero faça o seguinte:

Click 2 vezes com o botão esquerdo do mouse sobre os rótulos de dados e em seguida no menu FORMATAR RÓTULOS DE DADOS, click em NÚMEROS, click em PERSONALIZADOS e na caixa CÓDIGO DE FORMATAÇÃO digite: #;; click em ADICIONAR e em FECHAR, isso deve resolver o seu problema.

Abraços,

Doni

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

Postado : 26/10/2013 8:10 am

caje

(@caje)

Posts: 97

Trusted Member

Topic starter

Obrigado Doni.

Ajudou a retirar o rotulo em cima das colunas porém para remover o rotulo da linha do gráfico

Apliquei esse codigo no final da rotina e deu certo

 For i = 5 To 19 Step 1
  If Range("C" & i).Value = 0 Then
  Range("E" & i) = "=NA()"
    End If
     If Range("K" & i).Value = 0 Then  
  Range("L" & i) = "=NA()"
    End If
  Next
    Sheets("graficos_pareto").Select

Assim os 100% que não são necessários seram removidos do gráfico

Postado : 28/10/2013 7:56 am