如果调整一个cell的宽度? Sheet.Cells[1, iCount + 1] :=
TDBGrid1.Columns.Items[iCount].Title.Caption;//这样不行 Sheet.Cells[1, 0].width :=
TDBGrid1.Columns.Items[iCount].Title.Caption;
TDBGrid1.Columns.Items[iCount].Title.Caption;//这样不行 Sheet.Cells[1, 0].width :=
TDBGrid1.Columns.Items[iCount].Title.Caption;
你可以用EXCEL中的宏看一看!