Изменение высоты строки делает столбцы нечитаемыми

Мне нужно отобразить первую строку каждой строки (в данном случае столбец (F)) в удобочитаемом формате, чтобы убедиться, что я работаю с правильной строкой.

На изображении ниже показано, что происходит, когда я изменяю высоту строки. В этом случае столбец post_content становится нечитаемым. У меня есть другие столбцы с той же проблемой.

Данные считываются из других книг и листов через VBA.

Я попробовал приведенное ниже утверждение без какого-либо влияния:

Рабочие листы ("Лист1"). Диапазон ("F2"). WrapText = True

Я искал «перенос слов» и «высота строки» и не могу найти решение.

Ваш вклад очень приветствуется, спасибо, CraigM

Нечитаемо из-за изменения высоты строки.


person CraigM    schedule 29.06.2015    source источник


Ответы (1)


Похоже, содержимое ячейки выровнено по середине в вертикальном направлении. В дополнение к обтеканию текста в ячейке установите для него выравнивание по верхнему краю.

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

Вы можете найти команду в группе «Выравнивание» на ленте «Главная» и использовать средство записи макросов, чтобы увидеть, какой код для этого требуется:

введите здесь описание изображения

person teylyn    schedule 29.06.2015
comment
Идеально по деньгам! Огромное спасибо! Я узнал сегодня, CraigM - person CraigM; 30.06.2015