☰

Excel - 单元格中的多行文本

tag-icon • tag-icon microsoft-excel-2013
Excel - 单元格中的多行文本

我在表格单元格中获得了多行文本。设置宽度和高度后，为了仅显示第一行，我希望在单击单元格时展开多行显示全部内容。单元格是文本换行。

可以这样做吗？

答案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

相关内容