loExcel=CreateObject("Excel.Application") loFile=loExcel.Workbooks.Open(lcFile) * replace any cell loFile.Range('C1').Value='tel number' loFile.Save() loFile.Close() loExcel.Quit()MartinaJ
>>>CLOSE all >>>SET DATE BRITISH >>>SET CENTURY on >>>thisform.text9.Value=GETFILE('xls') >>>************************************************** >>> declare long ShellExecute in "shell32.dll" ; >>> long hwnd, string lpszOp, ; >>> string lpszFile, string lpszParams, ; >>> string lpszDir, long nShowCmd >>>ShellExecute(0,'Open',thisform.text9.Value,'','',1) >>>******************************************************** >>>IMPORT FROM (thisform.text9.value) TYPE xls &&&erorr message >>>