Use CreateObject to access an Excel spreadsheet

dim app as object;

dim wb as object;

dim ws as object;

app = CreateObject("Excel.Application");

wb = app.Workbooks.Add();

ws = wb.ActiveSheet;

ws.Range.("A1").value = 20;

ws.Range.("A2").value = 30;

ws.Range.("A3").value = "=A1*A2";

LogMessage(ws.Range("A3").Value);

wb.Close(false);