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

2026版辅助挂！牵手游戏ap... 2026版辅助挂！牵手游戏app辅助器，心悦踢辅助软件-其实真的是有辅助神器（哔哩哔哩）1、完成牵手...

反观！金州水鱼脚本，永盛联盟辅... 反观！金州水鱼脚本，永盛联盟辅助脚本-其实真的是有辅助插件（哔哩哔哩）1、下载好永盛联盟辅助脚本脚本...

方法辅助挂！新漫游免费辅助器，... 方法辅助挂！新漫游免费辅助器，新海贝之城脚本-竟然存在有辅助脚本（哔哩哔哩）在进入新漫游免费辅助器软...

代打辅助挂！微信老铁13水辅助... 代打辅助挂！微信老铁13水辅助，仙神互娱辅助-果然确实有辅助器（哔哩哔哩）1、任何微信老铁13水辅助...

黑科技辅助挂！乐酷副厅外卖辅助... 黑科技辅助挂！乐酷副厅外卖辅助，掌中乐游戏辅助工具-好像真的是有辅助工具（哔哩哔哩）1、下载好掌中乐...

今日！桃乐甘肃麻将辅助器，天天... 今日！桃乐甘肃麻将辅助器，天天福建十三兵修改器-一贯存在有辅助挂（哔哩哔哩）1、任何天天福建十三兵修...

透视免费！新九天作必弊系统，赣... 透视免费！新九天作必弊系统，赣湘互娱辅助-切实是真的有辅助神器（哔哩哔哩）1、玩家可以在新九天作必弊...

截至目前！金虎爷辅助器，新51... 截至目前！金虎爷辅助器，新518互游插件下载-真是是真的有辅助神器（哔哩哔哩）1、下载好新518互游...

截至发稿！蜀山四川辅助脚本，福... 截至发稿！蜀山四川辅助脚本，福建天天开心辅助工具下载-真是真的是有辅助app（哔哩哔哩）1、上手简单...

随着！杭州都莱大菠萝买了挂有用... 随着！杭州都莱大菠萝买了挂有用吗，小唐家乐园辅助-真是是有辅助软件（哔哩哔哩）1、游戏颠覆性的策略玩...