Ver Mensaje Individual
  #1 (permalink)  
Antiguo 06/01/2008, 21:05
mmarti
 
Fecha de Ingreso: abril-2004
Ubicación: Cdoro. Rivadavia
Mensajes: 83
Antigüedad: 21 años
Puntos: 0
error con mschart

Hola a todos. Estoy empezando a usar mschart y me sale un error que no se a que se puede deber. Quizás puedan darme una mano.
Con este procedimiento recorro un listview y armo el grafico de acuerdo a los valores contenidos en dicho listview.

Private Sub Grafica()
Dim iIndiceFila As Integer
Dim iIndiceColumna
With chart.DataGrid

' Establecemos las Etiquetas de las Columnas
For iIndiceFila = 1 To lv.ListItems.Count
.RowLabel(iIndiceFila, 1) = lv.ListItems(iIndiceFila).text

Next
'Establecemos el tamaño del Chart
'Parametros: Total Etiquetas Cols, Total Etiquetas Series,
'Total Columnas, Total Series
.SetSize lv.ListItems.Count, 1, lv.ListItems.Count, 1
' Establecemos los valores de cada columna
' Parametros: Columna, Serie, Valor
For iIndiceFila = 1 To lv.ListItems.Count

.SetData iIndiceFila, 1, lv.ListItems(iIndiceFila).SubItems(1), 0

Next
End With
End Sub

El error que me da es: Error 1101 en tiempo de ejecución. Argumento de función incorrecto.
El error se produce al establecer las etiquetas de las columnas, mas especificamente al establecer la ultima etiqueta....
Alguna sugerencia?
Saludos!!