var AName: IXLSName; begin AName := Workbook.Names.Add('SalesTotal', '=Sheet1!$B$2'); AName.Comment := 'Sum of quarterly sales figures'; end;