我怎样才能有效地增加整个excel表格上的每个单元格的字体大小？

我怎样才能有效地增加整个excel表格上的每个单元格的字体大小？ 当我使用foreach循环excel不响应。

Answer 1

试试这个子：

  Sub IncreaseFontSize() ActiveSheet.Cells.Font.Size = 14 End Sub 

…只要改变大小，以任何你想要的。

Answer 2

不需要VBA（除非是另一个macros的一部分）：

只需select所有工作表（激活第一个工作表，然后按住Shift并select最后一个工作表），然后select所有单元格（ Ctrl – A ）并在Home标签的字体大小下拉菜单中input所需的字体大小，或使用“增加字体大小'button。