mschart

[piter123]

Salve, non riesco a far funzionare mschart per visualizzare in grafico alcune colonne.
all'interno di una form ho creato un mschart1 e un commandbutton1.
Allego il codice che ovviamente non funziona.


Private Sub CommandButton1_Click()

Dim thisarray(40, 3)

'CARICA I VALORI DI 40 CELLE PER COLONNA. THISARRAY 1 CARICA IL VALORE DELL'ASSE X MENTRE GLI ALTRI DUE CARICANO IL VALORE DEGLI ASSY Y DI DUE LINNE SUL GRAFICO.

For I = 1 To 40
thisarray(I, 1) = Cells(I + 4, 162) 'VALORE ASSE X
thisarray(I, 2) = Cells(I + 4, 169) 'VALORE DATO 1 ASSE Y
thisarray(I, 3) = Cells(I + 4, 170) 'VALORE DATO 2 ASSE Y
Next I

With MSChart1
.ChartData = thisarray()
.ShowLegend = True
.Title = "TIT1"
.Title.Location.LocationType = VtChLocationTypeTop
.ColumnCount = 2
.ColumnLabelCount = 2
.Column = 1
.ColumnLabel = "TIT2"
.Column = 2
.ColumnLabel = "TIT3"

.Plot.Axis(VtChAxisIdY).ValueScale.Auto = False
.Plot.Axis(VtChAxisIdY).ValueScale.Minimum = 0.15
.Plot.Axis(VtChAxisIdY).ValueScale.Maximum = 0.38

.REFRESH
End With
End Sub

[piter123]

Inoltre la colonna che carica il valore asse x avrei bisogno che mettesse i valori sull'asse x di mschart, come si fà, grazie
Magari se avete una guida sull'utilizzo di mschart ve ne sarei grato.
Saluti

[piter123]

ho trovato questa guida
http://www.ennius.altervista.org/vba/vba117.php

[Anthony47]

Ho provato una ricerca da google con la chiave "how to use" mschart; alcune delle risposte (varie centinaia) mi sembrano interessanti, ma forse e' meglio che le esamini tu direttamente.
Vale anche per il secondo topic "sempre su mschart".

So che e' una risposta low level, ma di piu' io non saprei dirti.
Ciao.