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

科普攻略！德普之星辅助器app... 科普攻略！德普之星辅助器app，we poker辅助器，德州论坛（有挂软件）是一款可以让一直输的玩家...

重大科普！佛手在线大菠萝智能辅... 重大科普！佛手在线大菠萝智能辅助器，wepoker作弊辅助，分享教程（有挂软件）；原来确实真的有挂（...

一分钟教会你！wepoker怎... 一分钟教会你！wepoker怎么增加运气，epoker透视，切实教程（有挂透视）1、点击下载安装，微...

六分钟了解！hhpoker有辅... 六分钟了解！hhpoker有辅助吗，wepoker国外版透视，扑克教程（有挂技巧）科技教程也叫必备教...

我来教大家！wepoker辅助... 我来教大家！wepoker辅助透视，wepoker免费脚本弱密码，详细教程（有挂透明）；wepoke...

记者发布！wpk辅助，德普之星... 记者发布！wpk辅助，德普之星透视辅助软件激活码，解密教程（有挂辅助）；亲真的是有正版授权，小编（透...

揭秘攻略！aapoker万能辅... 《揭秘攻略！aapoker万能辅助器，hhpoker真的假的，揭秘教程（有挂教程）》 aapoker...

重大通报！sohoo poke... 自定义sohoo poker辅助器系统规律，只需要输入自己想要的开挂功能，一键便可以生成出微扑克专用...

三分钟了解！wpk辅助器，hh... 1、三分钟了解！wpk辅助器，hhpoker免费辅助器，必赢教程（有挂神器）；详细教程。2、hhpo...

玩家必看攻略！wejoker私... 玩家必看攻略！wejoker私人辅助软件，智星德州可以透视吗，透明挂教程（有挂技巧）关于智星德州可以...