Excel VBA-列选择错误

Question

我需要autofit Sheetx前两列，但我希望能够从其他任何表格开始MACRO ，因此我正在使用With-method。 在这种情况下如何避免使用Select？

Set ws = ThisWorkbook.Sheets("Sheetx")

With ws

    .Columns("A:B").Select

    Selection.EntireColumn.AutoFit

End with

Answer 1

Set ws = ThisWorkbook.Sheets("Sheetx")

With ws
    .Columns("A:B").AutoFit
End with

这可能对您也有帮助。

Answer 2

像这样：

Set ws = ThisWorkbook.Sheets("Sheetx")

With ws
    .Columns("A:B").AutoFit
End with