VBA选择工作表中的所有列并自动调整Excel 2010中的所有列宽度

Question

我有一个超过1000列的工作表.如何选择该工作表中的所有列并自动调整每个列宽.我试过了

Sheets(1).Select
Selection.EntireColumn.AutoFit

但它没有用.有任何想法吗？

Answer 1

试试这个...

Sheets(1).UsedRange.Columns.AutoFit

Answer 2

您可以使用

Cells.Columns.Autofit

或者，如果您不在 ActiveSheet 上，则

Sheets(name_or_number).Columns.Autofit