Alterar a figura de Legenda em gráficos do Excel via VBA.

Question

Olá pessoal.

Como alterar a figura na legenda de gráfico do Excel?

Muito obrigado,

silvio pontes

---

silvio pontes

Answer 1

Se eu estiver entendido direito.

Dê um dupo clique na linha e altere a opção Estilo.

Caso não seja isto poste novamente para que alguém possa lhe ajudar.

Answer 2

Oi Jhonatan,

Quero fazer isso em VBA!

Ou então como transpor o que tem na macro:

    ActiveSheet.ChartObjects("Grafico Silente1").Activate
    ActiveChart.Legend.Select
    ActiveChart.Legend.LegendEntries(2).Select
    Selection.Format.Fill.Visible = msoFalse
    ActiveChart.Legend.LegendEntries(1).Select
    Selection.Format.Fill.Visible = msoFalse

-para VBA.

Mas como alterar tambem o objeto: square, circle,...

---

silvio pontes

Answer 3

Dica de Nando Freitas no link abaixo.

http://social.msdn.microsoft.com/Forums/pt-BR/vbapt/thread/ccd484c0-fd77-403e-81c0-81ced7a009e3

Worksheets("Folha1").ChartObjects(1).Chart.SeriesCollection(1).MarkerStyle = xlMarkerStyleSquare

E para tirar o preenchimento, seguindo a dica acima alteramos o Format.Fill.Visible para msoFalse.

Worksheets("Folha1").ChartObjects(1).Chart.SeriesCollection(1).Format.Fill.Visible= msoFalse

---

silvio pontes