行高变化使列不可读

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

您可以在主页功能区的对齐组中找到该命令，并使用宏录制器查看它需要什么代码：

Row height change makes columns unreadable