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

解迷透视!sohoopoker... 解迷透视!sohoopoker辅助!一直一直都是有辅助教程(有挂方针)-哔哩哔哩1、sohoopok...

必备透视！wpk是真的还是假的... 必备透视！wpk是真的还是假的，wepoker手机版辅助，法门教程（确实有挂）-哔哩哔哩1、任何wp...

解密透视!pokerworld... 解密透视!pokerworld修改器!一贯一直总是有辅助方法(有挂教程)-哔哩哔哩pokerworl...

必备透视！wepokerplu... 必备透视！wepokerplus外开挂，wepoker透视功能下载，模块教程（有挂教程）-哔哩哔哩1...

教你透视!pokermaste... 教你透视!pokermaster修改器!真是有辅助插件(有人有挂)-哔哩哔哩1、进入游戏-大厅左侧-...

有挂透视！wepoker有透视... 有挂透视！wepoker有透视吗，wepoker俱乐部辅助，大纲教程（今日头条）-哔哩哔哩1、起透看...

总结透视！wepoker透视脚... 总结透视！wepoker透视脚本免费下载pc，epoker透视底牌，机巧教程（真是有挂）-哔哩哔哩1...

揭露透视!werplan免费挂... 揭露透视!werplan免费挂下载!一直真的有辅助技巧(有挂详细)-哔哩哔哩1、玩家可以在werpl...

教你透视！werplan怎么透... 教你透视！werplan怎么透视，wepoker免费脚本咨询，手册教程（真实有挂）-哔哩哔哩1、让任...

了解透视!来玩app破解版!果... 了解透视!来玩app破解版!果然是真的有辅助技巧(有挂方式)-哔哩哔哩运来玩app破解版辅助工具，进...