This code uses the OLE support in the Win32 version of Notes to set the A1 cell in the Sheet1 worksheet to a value from Field1 in the current document:
Set obj = CreateObject("Excel.Application") obj.Workbooks.Open "c:\test.xls" value = doc.GetItemValue("Field")(0) obj.Worksheets("Sheet1").Range("A1").value = value