Excel使用vba自动调整选定列的列宽。
1.首先我们打开一个工作样表作为例子。
2.在示例中，我们属于一些数值型内容，但是由于列宽设置过小，数值型内容以#缩写的形式显示。这个时候我们看不到数值内容。
3.这时候我们只需要修改一列的宽度，增加列宽，即可以完整显示原始值。调整方法很简单，直接拖动或者输入数值即可。
4.在这里，我们可以使用更智能的方法，在vba中设置。使用alt f11组合键进入vbe编辑器，插入一个新模块，并在该模块中输入以下代码：
私有子工作簿_SheetChange(ByVal Sh作为对象，ByVal Target作为范围)
ActiveSheet。range(' I:I '). entire column . autofit。
末端接头
5.这里需要注意的是，因为是输入，所以属于单元格修改操作。然后，我们必须在此工作簿中定义单元格修改操作。也就是说，选择sheetchange。
6.此工作簿中设置的操作无需运行即可直接生效。我们现在可以在I列中输入数据，我们可以看到I列自动调整最长内容的列宽以与I列保持一致。
