#define CHR_TAB chr(9) #define CHR_CR chr(13) local loWord, loDoc, lcString loWord = newobject('word.application') loDoc = loWord.Documents.Add() lcString = "Parameters" + CHR_TAB + "Limit" + CHR_TAB + "Average" + CHR_CR ; + "Chlorine" + CHR_TAB + "13.5" + CHR_TAB + "10" + CHR_CR ; + "Boron" + CHR_TAB + "55.8" + CHR_TAB + "45" loWord.Visible = .t. loRange = loDoc.Range() luWhat = loRange.InsertAfter(lcString) && works but returns empty string loTable = loRange.ConvertToTable(1, , , , 23) && create a 3 row x 3 col table ? loTable.Cell(1,1).Value && error suspend