Note: The other languages of the website are Google-translated. Back to English

Excel:单击时如何展开单元格以显示所有内容

在某些情况下,如果单元格内容长于单元格的宽度并且下一列单元格中有值,则仅显示部分内容,如下面的屏幕截图所示。 为避免更改单元格的宽度和高度,您可以单击单元格并在编辑栏中查看全部内容。 但是如果编辑栏被隐藏或者比内容短,怎么办呢? 这里介绍一个 VBA,它可以在单击时在文本框中显示单元格内容。
从另一个列表自动完成

注意:本教程提供的方法均在 Excel 2021 中测试,在不同的 Excel 版本中可能会有一些不同。


单击时展开单元格以显示所有内容

1.激活要展开单元格的工作表,单击 开发商 > 插页 > 文本框(ActiveX 控件).
从另一个列表自动完成

如果没有 开发商 功能区中的选项卡,请先显示它,请查看本教程如何在 Excel 功能区中显示/显示开发人员选项卡

2. 然后拖动光标绘制一个宽高的文本框,可以显示最长的单元格内容。 记住这个文本框的名字,这里是TextBox1。
从另一个列表自动完成

3. 右键单击​​文本框,然后单击 特性 从上下文菜单中。 然后在 特性 窗格中,选择 从下拉列表中 多线自动换行 部分。 然后关闭 特性 窗格。
从另一个列表自动完成  从另一个列表自动完成

或者您可以从下拉列表中选择 True 自动尺寸 属性窗格中的部分,文本框将根据您单击的单元格内容的长度自动调整大小。

4. 右键单击​​状态栏中的工作表名称选项卡,然后单击 查看代码 从上下文菜单。

5。 在里面 Microsoft Visual Basic应用程序 窗口,将下面的代码复制并粘贴到空白脚本中。

VBA:展开单元格以显示内容

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'UpdatebyExtendoffice
Dim xRgAddress As String
xRgAddress = "A1:B4" 'the range this VBA work, if you leave it is blank, it work for whole sheet
If xRgAddress = "" Then
  With TextBox1
        .Top = Target.Top
        .Left = Target.Offset(, 1).Left
        .Text = Target.Text
        .Visible = True
    End With
Else
    If Intersect(Target, Range(xRgAddress)) Is Nothing Then
        TextBox1.Visible = False
    Else
        With TextBox1
            .Top = Target.Top
           .Left = Target.Offset(, 1).Left
            .Text = Target.Text
            .Visible = True
        End With
    End If
End If
End Sub

从另一个列表自动完成

请注意,TextBox1 是您绘制的文本框的名称,而 A1:B4 是此代码的工作范围,请根据需要更改它们。

6.回到工作表,点击 开发商 > 设计模式 存在设计模式。
从另一个列表自动完成

现在,当您单击单元格时,文本框将出现在其旁边,并显示单元格的全部内容。
从另一个列表自动完成


其他操作(文章)

如何关闭自动完成
这是 Excel 中可以停止自动完成的选项。

如何减小 Excel 文件大小?
有时,如果 Excel 文件太大,打开或保存需要几分钟。 为了解决这个问题,在本教程中,它告诉您如何通过删除不必要或从未使用过的内容或格式来减小 Excel 文件的大小。

如何自动完成另一个表中的单元格
在本教程中,它讨论了如何在输入一个列值后从另一个表中的表格中自动完成其他列单元格。

如何在Excel中将阴影应用于奇数或偶数(替代)行/列?
在设计工作表时,许多人倾向于对奇数或偶数(替代)行或列应用阴影,以使工作表更直观。 本文将向您展示两种将阴影应用于Excel中奇数或偶数行/列的方法。



  • 超级公式栏 (轻松编辑多行文本和公式); 阅读版式 (轻松读取和编辑大量单元格); 粘贴到过滤范围...
  • 合并单元格/行/列 和保存数据; 拆分单元格内容; 合并重复的行和总和/平均值...防止细胞重复; 比较范围...
  • 选择重复或唯一 行; 选择空白行 (所有单元格都是空的); 超级查找和模糊查找 在许多工作簿中; 随机选择...
  • 确切的副本 多个单元格,无需更改公式参考; 自动创建参考 到多张纸; 插入项目符号,复选框等...
  • 收藏并快速插入公式,范围,图表和图片; 加密单元 带密码 创建邮件列表 并发送电子邮件...
  • 提取文字,添加文本,按位置删除, 删除空间; 创建和打印分页小计; 在单元格内容和注释之间转换...
  • 超级滤镜 (将过滤方案保存并应用于其他工作表); 高级排序 按月/周/日,频率及更多; 特殊过滤器 用粗体,斜体...
  • 结合工作簿和工作表; 根据关键列合并表; 将数据分割成多个工作表; 批量转换xls,xlsx和PDF...
  • 数据透视表分组依据 周号,周几等 显示未锁定的单元格 用不同的颜色 突出显示具有公式/名称的单元格...
kte选项卡201905
  • 在Word,Excel,PowerPoint中启用选项卡式编辑和阅读,发布者,Access,Visio和Project。
  • 在同一窗口的新选项卡中而不是在新窗口中打开并创建多个文档。
  • 每天将您的工作效率提高50%,并减少数百次鼠标单击!
officetab底部
按评论排序
注释 (0)
还没有评分。 成为第一位评论!
这里还没有评论
留下你的意见
以访客身份发帖
×
评价此帖子:
0   产品特性
建议地点