VB.NET中的Excel自動填充列

我在這裏有我的代碼在VB6和它的工作。VB.NET中的Excel自動填充列

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

找遍了對什麼是關於如何使Excel列寬度自動調整功能在VB.NET或相當於替代，但我仍然沒有得到確切的自動調整功能。

任何幫助將不勝感激。

感謝先進！

無論您是從VB6還是VB.NET調用代碼，操作Excel列的方法都是相同的。因此，如果它在VB6中運行，應該不會更改代碼。

然而一些幫助 - 擁有在VB.NET看看this full example，包括自動調整

2013-10-14 12:10:47

我看了你給的鏈接，我已經把它應用到我的項目現在它運行得很好，就像我期望的那樣。謝謝 – user2878699

這是我如何在vb.net做的。

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

2013-10-14 12:10:48 aphoria

@ user2878699：你的代碼不「運行良好」。在VBA中，沒有'.EntireColumn'，'.AutoFit'什麼也不做！這個解決方案對於VBA是正確的 - 不是VB6，vb.net，... –

@Aphoria，感謝您的幫助。也許這不是完整的代碼行，但這個例子得到了我將需要的功能，這取決於開發人員如何構建他的代碼來工作。再次感謝！ – user2878699

它在我的環境中工作得很好。我唯一的變化就是將其更改爲： 'xlSheet.Cells.EntireColumn.AutoFit（）' –

例如，如果您不知道可以自動填充整個行的列數。

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

2014-07-18 14:28:22

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

With oSheet 

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

    End With

2015-07-21 08:20:40

回答