行高更改使列无法读取

Question

我需要以可读格式显示每一行的第一行（在本例中为列（F）），以确保我正在处理正确的行。

下图显示了更改行高时会发生什么。在这种情况下，post_content列变得不可读。我有其他专栏也有同样的问题。

通过VBA从其他工作簿和工作表中读取数据。

我已经尝试过以下声明而没有任何影响：

工作表（“Sheet1”）。范围（“F2”）。WrapText = True

我一直在搜索“word Wrap”和“Row Height”，但找不到解决方案。

非常欢迎您的意见，谢谢，CraigM

Answer 1

看起来单元格内容在垂直方向上是中间对齐的。除了将文本包装在单元格中之外，还要将其设置为顶部对齐

With Worksheets("Sheet1").Range("F2")
    .HorizontalAlignment = xlGeneral
    .VerticalAlignment = xlTop
    .WrapText = True
End With

您可以在Home功能区的Alignment组中找到该命令，并使用宏录制器查看它所需的代码：