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来手动调整当前列宽。这就会包含列头中的格式数据，让列宽更精确地自适应。

透视安装!wepoker免费脚... 透视安装!wepoker免费脚本弱密码(透视)钱塘十三水其实真的有挂(果然存在有辅助安装)-哔哩哔哩...

透视规律!poker worl... 透视规律!poker world辅助(透视)蛮王大厅辅助教程(果然是有辅助app)-哔哩哔哩1、玩家...

今天下午!aapoker免费透... 今天下午!aapoker免费透视脚本(透视)微乐斗地主有挂吗(好像存在有辅助插件)-哔哩哔哩1、用户...

透视肯定!约局吧游戏挂(透视)... 透视肯定!约局吧游戏挂(透视)圈麻圈脚本辅助(总是真的有辅助神器)-哔哩哔哩1、完成圈麻圈脚本辅助辅...

此事迅速冲上热搜!德州机器人代... 此事迅速冲上热搜!德州机器人代打脚本(透视)遇悦游戏辅助(确实有辅助修改器)-哔哩哔哩1、每一步都需...

透视实锤!德州透视是真的假的(... 透视实锤!德州透视是真的假的(透视)亿游十三道辅助(果然存在有辅助下载)-哔哩哔哩；该软件可以轻松地...

随着!wepoker私人局规律... 随着!wepoker私人局规律(透视)蜀山四川小程序作必弊码大全(原来是真的辅助修改器)-哔哩哔哩1...

截至目前!wpk是真的还是假的... 截至目前!wpk是真的还是假的(透视)潮汕汇木虱辅助下载(竟然是有辅助软件)-哔哩哔哩1、潮汕汇木虱...

在玩家背景下!wepoker黑... 在玩家背景下!wepoker黑侠辅助器正版下载(透视)开心泉州辅助(其实是有辅助app)-哔哩哔哩1...

透视中牌率!哈糖大菠萝怎么开挂... 透视中牌率!哈糖大菠萝怎么开挂(透视)打两圈辅助软件(好像真的有辅助下载)-哔哩哔哩1、哈糖大菠萝怎...