VB.NET中的Excel自適應列

Question

我在這里使用VB6中的代碼並且運行良好。

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

我已經搜索了如何在VB.NET中制作excel列寬度自動調整的等效或替代方法，但我仍然沒有得到確切的AutoFit函數。

任何幫助將不勝感激。

Answer 1

這就是我在vb.net中的表現。

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

Answer 2

例如，如果您不知道列數，則可以自動調整整個行。

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

Answer 3

無論是從VB6還是VB.NET調用代碼，操作Excel列的方法都是相同的。 因此，如果在VB6中工作，則不應對代碼進行任何更改。

但是要獲得一些幫助 - 請看一下VB.NET中包含autofit的完整示例

Answer 4

你好，我嘗試了所有這些解決方案..但沒有人工作..請采取正確的解決方案：

    With oSheet

        .PageSetup.Zoom = False
        .PageSetup.FitToPagesWide = 1
        .PageSetup.FitToPagesTall = False

    End With

Answer 5

我用的是ff。 用於自動調整使用范圍的代碼。

xlWorkSheet.UsedRange.EntireColumn.AutoFit()