本示例将工作表 Sheet1 上第一列的列宽设置为 14 磅。
ActiveWorkbook.Worksheets("Sheet1").Columns(1).ColumnWidth = 14