在VB.NET中的Excel自动填充列

我有我的代码在VB6和它的工作。

For CLms = 1 To 10 ws.Columns(CLms).AutoFit '<---Autofilt data on XL sheet Next CLms 

我已经search了如何在VB.NET中使excel列宽自动调整，但我仍然没有得到确切的AutoFit函数的等价物或替代方法。

任何帮助将不胜感激。

先谢谢了！

Answer 1

这是我在vb.net中完成的。

 xlSheet.Range("A1:X1").EntireColumn.AutoFit() 

Answer 2

无论您是从VB6还是从VB.NET调用代码，操作Excel列的方法都是相同的。 所以，如果它在VB6中工作，那么你的代码应该没有改变。

但有一些帮助 – 看看这个完整的例子在VB.NET，包括自动调整

Answer 3

例如，如果您不知道列的数量，您可以自动安装整个行。

 xlSheet.Rows.Item(1).EntireColumn.AutoFit() 

Answer 4

你好，我尝试所有这些解决scheme..但没有人是工作..请采取正确的解决办法：

  With oSheet .PageSetup.Zoom = False .PageSetup.FitToPagesWide = 1 .PageSetup.FitToPagesTall = False End With