Este fórum está sendo desativado

[Bredaum]

fala ae blz, teria algum codigo onde eu possa usar o grafico de dispersao xy de linha e o de bolhas juntos? tipo no office tem la os graficos de combinação, mas nao tem a opçao de usar o de bolhas e de linhas juntos...

eu fiz isso aqui: so que quero os valores que estao indo para o grafico 3 todos no grafico 21.

Sub Macro1() ' ' Macro1 Macro ' ' ActiveSheet.ChartObjects("Gráfico 21").Activate ActiveChart.FullSeriesCollection(1).XValues = "=Planilha1!E1:F1" ActiveChart.FullSeriesCollection(1).Values = "=Planilha1!E2:F2" ActiveChart.FullSeriesCollection(2).XValues = "=Planilha1!E3:F3" ActiveChart.FullSeriesCollection(2).Values = "=Planilha1!E4:F4" ActiveChart.FullSeriesCollection(3).XValues = "=Planilha1!E5:F5" ActiveChart.FullSeriesCollection(3).Values = "=Planilha1!E6:F6" ActiveChart.FullSeriesCollection(4).XValues = "=Planilha1!E7:F7" ActiveChart.FullSeriesCollection(4).Values = "=Planilha1!E8:F8" ActiveSheet.ChartObjects("Gráfico 3").Activate ActiveChart.SeriesCollection.NewSeries ActiveChart.FullSeriesCollection(2).XValues = "=Planilha1!$E$12" ActiveChart.FullSeriesCollection(2).Values = "=Planilha1!$F$12" ActiveChart.FullSeriesCollection(2).BubbleSizes = "=Planilha1!$B$4" end sub