dephi控制Excel遇到的一个问题

我想控制Excel的列的宽度，但是没成功。
代码如下：
eclApp:=CreateOleObject('Excel.Application');
WorkBook:=CreateOleobject('Excel.Sheet');
workBook:=eclApp.workBooks.Add;
.......
eclApp.ActiveSheet.Columns[1].ColumnsWidth:=10;
返回错误是：
Method'ColumnsWidth'not supported by automation object；
我查以前的帖子都是用ColumnsWidth控制列宽度的，请问各位可有此种情况出现。