最寬的列寬我有一個Excel工作簿〜150張。 有沒有辦法找到最寬的列(在本例中爲C列),然後在每個工作表中將列「C」設置爲這個寬度? 由於事先 查茲找到在Excel工作簿
-2
A
回答
0
Sub Main
Dim cell As Range
Dim maxWidth As Long
Dim sht As Worksheet
For Each sht in Worksheets
For Each cell In sht.UsedRange.Rows(1)
If cell.Width > maxWidth Then maxWidth = cell.Width
Next cell
Next sht
For Each sht in Worksheets
sht.Columns("C").ColumnWidth = maxWidth
Next sht
End Sub
+0
@Chaz,你有沒有完成它? – user3598756
+0
@ User3598756我最終將表單合併在一起以獲得我需要完成的工作。乾杯 – Chaz
+0
@Chaz,你可以這個代碼 – user3598756
相關問題
- 1. 將多個Excel工作簿合併到一個工作簿中
- 2. 如何插入(綁定)DataTable到Excel工作簿(VS Excel 2010工作簿項目)
- 3. VBA的Excel:粘貼到工作簿
- 4. 將表格添加到Excel工作簿
- 5. EXCEL VLOOKUP到其他工作簿
- 6. Excel工作簿到Outlook模板
- 7. 使用Marshal.GetActiveObject在空白的Excel工作簿中打開Excel工作簿
- 8. 查找Excel工作簿的工作表名稱和行號
- 9. 運行Excel工作簿
- 10. Excel工作簿自動化
- 11. SSRS Excel保護工作簿
- 12. 保護的Excel工作簿
- 13. unprotect excel工作簿#2
- 14. GetActiveObject從Excel的工作簿
- 15. Excel工作簿字段
- 16. Excel宏:分流工作簿
- 17. Excel工作簿故障
- 18. Excel工作簿鏈接
- 19. 從其他工作簿中找到匹配值的問題excel
- 20. 隱藏工作簿/工作表Excel VBA
- 21. pywin32 excel找到工作簿中有多少工作表並按編號索引?
- 22. Excel加載項 - 獲取「本工作簿」的工作簿名稱
- 23. 複製保護的Excel工作簿中到另一個工作簿蟒蛇
- 24. Excel宏將副本從一個工作簿複製到另一個工作簿
- 25. 從一個Excel工作簿複製到另一個工作簿通過C#
- 26. 從宏工作簿複製並粘貼到多個工作簿Excel
- 27. Excel VBA:從另一個工作簿複製行並粘貼到主工作簿
- 28. 在asp.net中創建excel工作簿
- 29. 列表Excel工作簿連接在C#
- 30. 在網站上嵌入excel工作簿
是有一種方法。你有什麼嘗試? – 2016-09-22 01:41:46
嘿托馬斯,我只手動通過每個選項卡,並檢查列「C」的每個寬度。我不知道如何自動執行,因此問題的原因 – Chaz
您應該總是嘗試併發布一些代碼與您的問題。你想最寬的列自動適合它的實際寬度還是隻使用它的當前ColumnWidth? – 2016-09-22 02:30:52