AutoFit无法正常工作（使用表头的宽度进行AutoFit） _程序开发

创始人

2024-11-12 13:30:18

0次

如果您有以下代码：

Sub AutoFitColumns()
    'AutoFit columns
    Cells.EntireColumn.AutoFit
End Sub

这时候可能就遇到了AutoFit无法正常工作的问题。原因是Cells.EntireColumn.AutoFit仅使用了列中的无格式数据进行自适应，而不使用列头中的任何格式数据。这就导致了并没有按照列头的宽度自动调整列宽度。

为了解决这个问题，您需要使用以下代码来手动自适应列：

Sub ManualAutoFitColumns()
    Dim c As Range
    For Each c In Range("A1:Z1")  '目标范围，这里以A1到Z1为例
        c.EntireColumn.AutoFit
    Next c
End Sub

在这个代码片段中，我们首先定义了一个Range对象。For Each语句会遍历这个对象内的每一个列头范围，包括A1到Z1。在循环体中，我们使用c.EntireColumn.AutoFit来手动调整当前列宽。这就会包含列头中的格式数据，让列宽更精确地自适应。

不少玩家反映!哈糖大菠萝有没有... 不少玩家反映!哈糖大菠萝有没有挂(透视)一贯是有辅助软件(有挂秘籍)-哔哩哔哩1、下载好哈糖大菠萝有...

据文件显示!wepoker插件... 据文件显示!wepoker插件功能辅助器(透视)一贯是真的辅助辅助器(竟然有挂)-哔哩哔哩1、打开软...

现有关情况通报如下!购买的wp... 您好，购买的wpk辅助在哪里下载这款游戏可以开挂的，确实是有挂的，需要了解加去威信【13670430...

透视透视挂!xpoker辅助(... 透视透视挂!xpoker辅助(透视)竟然有辅助下载(有挂总结)-哔哩哔哩1、该软件可以轻松地帮助玩家...

透视代打!wepoker是不是... 透视代打!wepoker是不是有人用挂(透视)切实真的有辅助插件(有挂透明挂)-哔哩哔哩1、点击下载...

据监测!hhpoker德州透视... 据监测!hhpoker德州透视挂(透视)本来是真的辅助插件(有挂猫腻)-哔哩哔哩hhpoker德州透...

透视游戏!wepoker怎么挂... 透视游戏!wepoker怎么挂底牌(透视)都是有辅助app(真实有挂)-哔哩哔哩1、wepoker怎...

透视黑科技!newpoker怎... 透视黑科技!newpoker怎么安装脚本(透视)切实真的有辅助神器(有挂细节)-哔哩哔哩newpok...

透视中牌率!德普之星透视辅助软... 透视中牌率!德普之星透视辅助软件下载(透视)果然真的是有辅助工具(证实有挂)-哔哩哔哩1、完成德普之...

今日!wepoker私人局透视... 今日!wepoker私人局透视教程(透视)好像真的有辅助软件(有挂实锤)-哔哩哔哩1、每一步都需要思...