Inserire titolo Grafico



  • Inserire titolo Grafico
    di ilFonta (utente non iscritto) data: 25/12/2012 15:26:15

    Salve a tutti, mi chiamo Giacomo e sono un pivello del VBA.
    Sto cercando di imparare questo linguaggio per utilizzarlo con Excel 2010.

    Questo listato semplicissimo serve solo a creare un grafico, ma mi piacerebbe poter mettere
    anche un titolo e le etichette agli assi tanto per cominciare.

    So che si possono usare le istruzioni ad. es.
    ActiveChart.ChartTitle.Caption = "My Chart"

    o

    ActiveChart.ChartTitle.Text = "My Chart"

    ma ricevo comunque un errori.

    Ogni aiuto sarà gradito. Grazie eauguri.
     
    Sub grafico()
    Dim WS As Worksheet
    Set WS = Worksheets("Sheet1")
    WS.Shapes.AddChart.Select
    ActiveChart.SetSourceData Source:= WS.Range("F6:F9")
    ActiveChart.ChartType = xlXYScatter 
    End Sub



  • di Vecchio Frac data: 25/12/2012 19:10:23

    In Excel 2003 non ci sono istruzioni simili.
    Quindi ho dovuto aprire una macchina virtuale con Excel 2007, che è per molti versi analogo a Excel 2010, e smanettando un po' con la Guida ho trovato che queste istruzioni risolvono il tuo problema ^_^
     
    ActiveChart.HasTitle = True
    ActiveChart.ChartTitle.Text = "MyChart"





  • risolto
    di ilFonta (utente non iscritto) data: 26/12/2012 01:28:20

    Grazie mille
    Tra l'altro sono riuscito a risolvere anche facendo esperimenti con il registratore di macro e osservando poi quello che era stato composto nell'ambiente di sviluppo VBA.

    Ebbene si può dare un titolo al grafico anche scrivendo queste due righe sopo aver definito le serie
     
     ActiveChart.SetElement (msoElementChartTitleAboveChart)
        Selection.Caption = "miografico"