EOLeError？ (100分)

ExcelID := CreateOleObject( 'Excel.Application' );
excelId.workbooks.open('d:/1.xls');
excelid.worksheets.add;
ExcelID.WorkSheets[4].Activate;
★ ExcelID.ActiveSheet.Columns.Columns[3].ColumnsWidth := 5;
ExcelID.cells[2,3].Borders[4].Weight := 3;
for i:=1 to 20 do
excelid.cells[1,i]:='1 2 ';
excelid.rows[1].Font.UnderLine := True;

ExcelID.ActiveSheet.PrintPreview;
excelid.workbooks.close;
excelid.quit;

执行到★说是：‘raised exception class EOLeError with message
'Method'ColumsWidth' not supported by automation object'’

顶再顶

是不是应该写成：
ExcelID.workbooks.ActiveSheet.Columns.Columns[3].ColumnsWidth := 5;
你试试，我感觉是这样啊

ExcelID.ActiveSheet.Columns[3].ColumnWidth := 5;
把ColumnsWidth写成ColumnWidth就对了