1. Cells.EntireColumn.AutoFit '所有单元格列宽自动调整
    2. Cells.EntireRow.AutoFit '所有单元格行高自动调整
    3. Columns(1).EntireColumn.AutoFit '仅针对第1列进行列宽自动调整
    4. Rows(1).EntireRow.AutoFit '仅针对第1行进行行高自动调整
    5. Cells(2, 3).EntireColumn.AutoFit '仅对C2单元格(行2、列3)所在的列即第3列进行列宽自动调整
    6. Cells(2, 3).EntireRow.AutoFit '仅对C2单元格(行2、列3)所在的行即第2行进行行高自动调整
    1. sht.Range("A1").CurrentRegion.RowHeight = 20
    2. sht.Range("A1").CurrentRegion.ColumnWidth = 5