Question

我在Worksheet_Change Sub中使用以下vba来自动调整包含文本条目的特定列：

Error: Error executing "google-chrome --user-data-dir=/tmp/temp_chrome_user_data_dir_for_cordova http://localhost:8000/index.html": /bin/sh: 1: google-chrome: not found

上面的问题是，每当您输入该列文本的单元格比其他单元格短时，它将缩小列以适合目标单元格，而其他单元格则保留文本外部。我能解决这个问题吗？

Answer 1

使用.EntireColumn方法。有了这个，就不需要Select任何细胞。

Private Sub Worksheet_Change(ByVal Target As Range)

'added extra error trapping in case something happens where more than 1 column is changed.
If Target.Columns.Count = 1 And Target.Column = 1 Then 

    Target.EntireColumn.AutoFit

End If

End Sub

自动调整目标单元格，但仅限于内容较大时

1 个答案: