在 Excel 中最大化单元格边框内的字体大小

Question

在 excel 上，是否有任何快捷方式或按钮可以最大化单元格边框内的多个单元格的字体大小？我有一个 excel 文件，其中工作表上所有单元格的单元格大小相同，每个单元格的文本长度不同。我不想更改单元格大小，但我想根据单元格的长度将每个文本的字体大小更改为最大值。我已经将文本换行，我可以通过逐个更改每个单元格的字体大小来查看文本是否超出单元格边框，但这很耗时。在 excel 上是否有任何快捷方式可以一次性完成此操作？

Answer 1

选择相关单元格，然后在“单元格格式”对话框中的“对齐”选项卡上，选择“缩小以适合”，然后单击“确定”。任何内容太宽而无法容纳的单元格都会缩小可见文本，以使其适合单元格。格式化的字体大小实际上不会改变，因此当您更改单元格内容时，您无需执行任何操作。

据我所知，“缩小以适应”与“换行”不兼容，因为那将扩大行高以容纳多余的行，此时没有什么可缩小的。

Answer 2

设置缩小以适合选项并运行代码：

Sub fit()
    Rows("1:1048576").EntireRow.AutoFit
End Sub