excel VBA一次设置多列的列宽，多个赋值

Question

Columns("A:J").ColumnWidth = Array("4.5", "8.88", "5.75", "18", "37.75", "10.38", "11.25", "9.38", "8.38", "13.5")
'这样为什么不行，用And Or 也都不行

Range("A" & i & ":H" & i) = Sheets(2).Range("A" & i & ":H" & i)
这个也不行 o.O 假如我要同时复制A3,A5,A8三个单元格呢？

Answer 1

选中需要调整的列，在格式下拉菜单里鼠标点击自动调整列宽，同样方法可以设置自动调整行高。但如果要使表格里的内容自动换行，则需到单元格格式里进行设置。追问

不要自动调整。固定的模板，用VBA的用途就是要自动生成人哦