** mztolo 2006
** membuka file xls yg ada dan menuliskan data di cell yg lain
LOCAL nama,alamat, hasil

nama="DIAN"
alamat="JAKARTA"
hasil="c:\dataku.xls"

oxls=CREATEOBJECT("Excel.Application")
oworkbuk= oxls.workbooks.open(hasil)

WITH oworkbuk.activesheet
	.range("c1").value=nama
	.range("c2").value=alamat
	.range("c1:c2").interior.color=RGB(0,192,192)
ENDWITH

oworkbuk.save()
oxls.quit()
RELEASE oxls