2017-09-05 104 views
0

我需要autofitSheetx的前两列,但我希望能够从任何其他表开始MACRO,所以我使用With-method。 如何避免在这种情况下使用选择?Excel vba - 列选择错误

Set ws = ThisWorkbook.Sheets("Sheetx") 

With ws 

    .Columns("A:B").Select 

    Selection.EntireColumn.AutoFit 

End with 

回答

2
Set ws = ThisWorkbook.Sheets("Sheetx") 

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

This可以帮助你以及。

+0

是的,这工作。谢谢 – user155754

+0

尼斯答案:注意:“wholeColumn”这个陈述不是她需要的。因为他选择了所有的洞柱。只有当他选择Range(“A1:B1”)时才需要这个陈述,那么他将会定义EntireColumn的陈述。 但是,这并不重要,但是,如果您在大循环中使用它,每次都会导致不必要的查找。 – Moosli

2

像这样:

Set ws = ThisWorkbook.Sheets("Sheetx") 

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

这也适用。也谢谢你。 – user155754