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、实时丽水茶苑苹果手机辅助透视辅...

第一分钟辅助！闲来辅助神器下载... 第一分钟辅助！闲来辅助神器下载2022，好像真的有辅助方法（有挂教程）1、不需要AI权限，帮助你快速...

九分钟辅助！丽水都莱辅助工具试... 九分钟辅助！丽水都莱辅助工具试用，确实存在有辅助神器（有挂方法）九分钟辅助！丽水都莱辅助工具试用，确...

第一分钟辅助！蛮王辅助器，好像... 第一分钟辅助！蛮王辅助器，好像是有辅助方法（有挂教学）1、首先打开蛮王辅助器辅助器下载最新版本，在蛮...

第六分钟辅助！潮汕汇挂，一贯真... 第六分钟辅助！潮汕汇挂，一贯真的是有辅助插件（有挂辅助）1、这是跨平台的潮汕汇挂轻量版有透视，在线的...

六分钟辅助！微信开心泉州辅助器... 六分钟辅助！微信开心泉州辅助器，一直有辅助器（有挂教学）1、下载好微信开心泉州辅助器透视辅助下载之后...

第3分钟辅助！佛手十三道破解版... 第3分钟辅助！佛手十三道破解版安卓，竟然真的有辅助攻略（有挂存在）1、让任何用户在无需佛手十三道破解...

2分钟辅助！sohoo竞技联盟... 2分钟辅助！sohoo竞技联盟辅助，切实真的有辅助脚本（有挂技术）1.sohoo竞技联盟辅助选牌创...

第8分钟辅助！心悦手游辅助器，... 第8分钟辅助！心悦手游辅助器，原来真的是有辅助技巧（确实有挂）；1、每一步都需要思考，不同水平的挑战...

第十分钟辅助！广东雀神祈福真的... 第十分钟辅助！广东雀神祈福真的有用吗，都是是有辅助技巧（有挂方略）1、下载好广东雀神祈福真的有用吗透...