FoxPro/Visual FoxPro - Ms Graph

En version 6
Tengo el siguiente codigo para generar un grafico.

El grafico base ya viene generado en el init del form, por lo tanto luego doy posibilidad de seleccion de 3 tipos de graficos.

CLOSE DATA
USE depaso1
go top
scat memvar

THISform.LockScreen = .T.

WITH ThisForm.ole1

DO CASE
Case op=1
.charttype=-4101 &&linea3d
.haslegend=.f.
case op=2
.charttype=-4100 &&columna3d
.haslegend=.f.
case op=3
.charttype=70 &&torta3d seccionada
.haslegend=.t.
endcase

with .object.application

WITH .DataSheet

.Range("01").value =""
.Range("02").value =""
.Cells(1,2).value="Ene"
.Cells(2,2).value=m.m1
.Cells(1,3).value="Feb"
.Cells(2,3).value=m.m2
.Cells(1,4).value="Mar"
.Cells(2,4).value=m.m3
.Cells(1,5).value="Abr"
.Cells(2,5).value=m.m4
.Cells(1,6).value="May"
.Cells(2,6).value=m.m5
.Cells(1,7).value="Jun"
.Cells(2,7).value=m.m6
.Cells(1,8).value="Jul"
.Cells(2,8).value=m.m7
.Cells(1,9).value="Ago"
.Cells(2,9).value=m.m8
.Cells(1,10).value="Set"
.Cells(2,10).value=m.m9
.Cells(1,11).value="Oct"
.Cells(2,11).value=m.m10
.Cells(1,12).value="Nov"
.Cells(2,12).value=m.m11
.Cells(1,13).value="Dic"
.Cells(2,13).value=m.m12
if op < 3
.Cells(1,14).value="Tot"
.Cells(2,14).value=m.total
endif
endwith
endwith
ENDWITH

THISform.LockScreen = .f.

Los graficos se generan bien, pero al querer modificarlo y con solo hacer
click sobre el grafico sale el siguiente error... "El tipo de datos no es
valido para esta propiedad." Cual???? no puedo descubrirla.
El objeto ole no tiene definido ninguna propiedad, todo es por default, el
form tampoco.
Los valores op vienen desde el optiongroup que contiene a este codigo en el
Click.
Espero sea suficiente esta informacion.
Agradecere alguna idea.

Dario

Lo que no acepta es <.Cells(2,14).value=m.total > debe ser de tipo caracter si es entero saldra el error.

espero sirva de algo, suerte.

atte, Gregory

gracias