在VBA中动态设置行高

我有一个要求，我必须动态设置行高度。例如，输入看起来像-

我希望我的输出看起来像-

该行中的字符串将不断更改。那么，现在根据什么字符，我应该设置行高？谢谢请分享您的想法。

使用WrapText属性。。。像这样：

Range("A4").WrapText = True

使用WrapText属性。。。像这样：

Range("A4").WrapText = True

试试这个：

Rows(4).Autofit

它将根据该行中单元格的内容自动调整行高的大小

Rows(4).Autofit

它将根据行中单元格的内容自动调整行高