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

科技介绍！wpk作弊是真的吗，... 科技介绍！wpk作弊是真的吗，sohoo poker辅助，竟然存在有挂（有挂工具）1、辅助器安装包、...

最新技巧！wepoker免费透... 最新技巧！wepoker免费透视脚本，约局吧透视挂下载，切实存在有挂（有挂透视）1、每一步都需要思考...

重大科普！cloudpoker... 重大科普！cloudpoker作弊，hhpoker是正规的吗，其实是有挂（有挂透明挂）1、透视辅助软...

推荐一款！wepoker新号好... 推荐一款！wepoker新号好一点吗，德普之星辅助工具如何打开，好像是真的有挂（有挂攻略）1、首先打...

揭秘攻略！pokemmo脚本最... 揭秘攻略！pokemmo脚本最新版，悟空黑桃a辅助，竟然是真的有挂（有挂头条）脚本下载中分为三种模型...

免费测试版！hhpoker作弊... 免费测试版！hhpoker作弊实战视频，wpk德州局怎么透视，好像是有挂（详细教程）1、上手简单，内...

一起来讨论！wepoker透视... 一起来讨论！wepoker透视脚本下载，aapoker辅助工具安全吗，本来真的有挂（有人有挂）1.w...

我来教大家！约局吧怎么看有没有... 我来教大家！约局吧怎么看有没有挂，wepoker作弊方法，一直真的是有挂（有挂实锤）1、免费脚本咨询...

传递经验！wejoker黑侠辅... 传递经验！wejoker黑侠辅助器，wepoker安装教程，本来有挂（有人有挂）1、任何透视是真的假...

关于！xpoker辅助器，aa... 关于！xpoker辅助器，aapoker透视插件，果然是有挂（真是有挂）1、公共底牌简单，透视插件操...