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...

六分钟辅助！闲逸辅助插件，道游... 六分钟辅助！闲逸辅助插件，道游互娱辅助（总算清楚开挂辅助脚本）；1.闲逸辅助插件 ai辅助创建新账号...

第4分钟透视！微乐家乡小程序脚... 第4分钟透视！微乐家乡小程序脚本ios，新二号辅助（科普开挂辅助插件）；亲，微乐家乡小程序脚本ios...

第七分钟辅助！天天乐卡五星，川... 第七分钟辅助！天天乐卡五星，川滇互娱app辅助（最新技巧开挂辅助插件）;川滇互娱app辅助是一项川滇...

第五分钟透视！蛮王大厅辅助教程... 蛮王大厅辅助教程无需打开直接搜索微信：136704302本司针对手游进行，选择我们的四大理由: 1...

第7分钟辅助！好友赣南能装挂吗... 第7分钟辅助！好友赣南能装挂吗，同城游辅助工具（重大通报开挂辅助软件）;好友赣南能装挂吗AI智能教程...

第二分钟辅助！逗娱碰胡开挂，欢... 欢聚水鱼脚本无需打开直接搜索微信：136704302本司针对手游进行，选择我们的四大理由: 1、软...

第九分钟辅助！新道游辅助器免费... 第九分钟辅助！新道游辅助器免费版，福建老友破解（科技新动态开挂辅助脚本）；详细新道游辅助器攻略（新道...

第三分钟开挂！吉林心悦游戏辅助... 第三分钟开挂！吉林心悦游戏辅助，樱花之盛辅助软件（实测分享开挂辅助下载）；无需打开直接搜索薇:136...

1分钟辅助！poker wor... 1分钟辅助！poker world辅助，微信大厅辅助挂（透视新版开挂辅助软件）；亲真的是有正版授权，...