Excel - мутлиновый текст в ячейке

Question

Я получил многострочный текст в ячейке таблицы. после установки ширины и высоты для отображения только первой строки, я бы хотел, чтобы при щелчке по ячейке была развернута полная строка содержимого. ячейка обернута в текст

возможно ли это сделать?

Answer 1

Откройте редактор макросов, в левом дереве под объектами Microsoft Excel дважды щелкните на листе, где вы хотите это поведение, а затем в правой части вставьте это:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    Cancel = True
    cell_width = Target.Width
    cell_height = Target.Height
    Target.Rows.AutoFit
    Application.Wait (Now + TimeValue("0:00:05")) 'time expanded
    Target.RowHeight = cell_height
End Sub

Теперь, когда кто-то дважды щелкает ячейку, она расширяется и через 5 секунд возвращается к своему первоначальному размеру.

Он отключит редактирование двойным кликом и записью в ячейку, но не редактирует в поле формулы. Если необходимо изменить ячейку, просто измените Cancel=True на Cancel=False