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私人局辅助器(辅助挂)xpoker辅助(总是存在有挂);人气非常高，ai更新...

一分钟了解!wepoker破解... 一分钟了解!wepoker破解版内购(辅助挂)wpk透视插件(往昔真的是有挂);1、超多福利：超高返...

实测发现!鸿狐大厅脚本(辅助挂... 实测发现!鸿狐大厅脚本(辅助挂)fishpoker透视底牌(本然真的是有挂)，鸿狐大厅脚本是用手机号...

一分钟揭秘!微乐小程序游戏破解... 一分钟揭秘!微乐小程序游戏破解器下载(辅助挂)德普之星透视(本然真的有挂);AI辅助机器人普及解说快...

必看攻略!丽水都莱大菠萝辅助(... 必看攻略!丽水都莱大菠萝辅助(辅助挂)wepoker透视脚本免费app(好像有挂);人气非常高，ai...

玩家必备教程!连连看辅助器手机... 玩家必备教程!连连看辅助器手机版(辅助挂)wepoker开脚本视频(竟然有挂)；致您一封信；亲爱连连...

推荐一款!创思维正版辅助器下载... 推荐一款!创思维正版辅助器下载(辅助挂)聚星ai辅助工具收费多少(一直存在有挂)；致您一封信；亲爱创...

最新研发!全民比鸡bug(辅助... 最新研发!全民比鸡bug(辅助挂)aapoker辅助怎么用(最初有挂)；超受欢迎的全民比鸡bug稳赢...

盘点一款!八张透视辅助(辅助挂... 盘点一款!八张透视辅助(辅助挂)we-poker辅助器(确实真的是有挂)；致您一封信；亲爱八张透视辅...

今日头条!微乐自建房怎么提高胜... 今日头条!微乐自建房怎么提高胜率(辅助挂)wepoker是不是有人用挂(竟然真的有挂)；暗藏猫腻！微...