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、这是跨平台的德普之星辅助器黑科技，在线的操...

透视模拟器!aapoker辅助... 透视模拟器!aapoker辅助器怎么用(透视)辅助(确实是有挂)1、aapoker辅助器怎么用透视辅...

透视实锤!德普之星透视软件免费... 透视实锤!德普之星透视软件免费入口官网(透视)免费透视（竟然真的有挂）1、德普之星透视软件免费入口官...

透视免费!aapoker真的假... 透视免费!aapoker真的假的(透视)插件(果然是真的有挂)进入游戏-大厅左侧-新手福利-激活码辅...

透视黑科技!德普之星透视(透视... 透视黑科技!德普之星透视(透视)透视辅助软件（果然是真的有挂）1、全新机制【德普之星透视软件透明挂】...

透视黑科技!aapoker透视... 透视黑科技!aapoker透视方法(透视)辅助(好像是真的有挂)1、该软件可以轻松地帮助玩家将aap...

透视线上!德普之星辅助软件(透... 透视线上!德普之星辅助软件(透视)透视辅助插件（真是有挂）1、进入游戏-大厅左侧-新手福利-激活码辅...

透视美元局!aapoker破解... 透视美元局!aapoker破解侠是真的吗(透视)插件(一贯真的有挂)；一、aapoker破解侠是真的...

透视规律!德扑圈透视(透视)透... 透视规律!德扑圈透视(透视)透视（好像是有挂）1、完成德扑圈透视透视辅助安装，帮助玩家取得所有比赛的...

透视攻略!aapoker ai... 透视攻略!aapoker ai插件(透视)插件(好像有挂)1、操作简单，无需注册，只需要使用手机进行...