我在这里使用VB6中的代码并且运行良好.
For CLms = 1 To 10
ws.Columns(CLms).AutoFit '<---Autofilt data on XL sheet
Next CLms
Run Code Online (Sandbox Code Playgroud)
我已经搜索了如何在VB.NET中制作excel列宽度自动调整的等价或替代方法,但我仍然没有得到确切的AutoFit函数.
任何帮助将不胜感激.
aph*_*ria 12
这就是我在vb.net中的表现.
xlSheet.Range("A1:X1").EntireColumn.AutoFit()
Run Code Online (Sandbox Code Playgroud)