Hola !!, tengo el siguiente codigo, como puedo adaptarlo para que sea de 12 columnas.
OPEN DATABASE stock
SELECT 0
USE meses
public pantalla
pantalla = createobject("form")
pantalla.addobject("objeto", "olecontrol", "msgraph.chart.8")
pantalla.objeto.top = 0
pantalla.objeto.left = 0
pantalla.objeto.height = pantalla.height
pantalla.objeto.width = pantalla.width
pantalla.visible = .t.
pantalla.objeto.visible = .t.
pantalla.lockscreen = .t.
pantalla.objeto.object.application.chart.charttype = -4100
pantalla.objeto.object.application.datasheet.range("00").value = "Ventas"
pantalla.objeto.object.application.datasheet.range("01").value = "Ventas"
pantalla.objeto.object.application.datasheet.range("02").value = 0
pantalla.objeto.object.application.datasheet.range("A0").value = "Enero"
pantalla.objeto.object.application.datasheet.range("A1").value = meses.enero
pantalla.objeto.object.application.datasheet.range("A2").value = ""
pantalla.objeto.object.application.datasheet.range("B0").value = "Febrero"
pantalla.objeto.object.application.datasheet.range("B1").value = meses.febrero
pantalla.objeto.object.application.datasheet.range("B2").value = ""
pantalla.objeto.object.application.datasheet.rows("4").delete
pantalla.objeto.object.application.datasheet.rows("5").delete
pantalla.objeto.object.application.datasheet.columns("4").delete
pantalla.objeto.object.application.datasheet.columns("4").delete
pantalla.objeto.object.application.chart.hastitle = .t.
pantalla.objeto.object.application.chart.charttitle.text = "Mi gráfico"
pantalla.lockscreen = .f.