Selection.WrapText = True 将选择区域设置为自动换行Selection.autofit 将选择区域设置为设置自动行高selection可以改为rows(XX),xx为要改行高的哪行!或者改成指定单元格,比如Range("A1")
Worksheets(1).Rows("1:2").AutoFit 自动行高
