本工作簿不能再使用其他新字体

楼主
99253415

Q:更改单元格字体时跳出"本工作簿不能再使用其他新字体"，怎么办？

A:
原因：
1.当excel使用到一定时间,套用公式用到一定数量后就会出现这种问题
2.由图表的字体自动缩放而引起。工作表中含有大量的图表对象，并且这些对象被缩小成一条线，一般很难发现
3.工作簿中使用了在其他计算机上没有的字体。（不过我觉得这个可能性还是很小，因为一般人都用的宋体字，这个打印效果要好。一般不会用一些古怪的少用的字体）。
4.当excel使用到一定时间,套用公式用到一定数量后就会出现这种问题。

解决方法：因为产生的原因比较多，解决方法也不单一，所以请遇到这样的问题的朋友，试一下下面的方法。
1. 全选整个工作表，重新选一下字体，就可以将字体改颜色了。这个方法就是我遇到的情况，改不了字体颜色的解决方法。
2.你可以新建一个excel档案，把原档案复制粘贴到新档案后保存即可正常使用。
3.检查一下: 开始------控制面板-------字体,看看这个文件夹的字体是否完整，是否存在EXCEL被引用的字体，最好就是用上面第一个方法将表中的字体设置为最常用的字体，就可以排除这个检查了。
4.在EXCEL中一次点击菜单“编辑”-“定位”-“定位条件”-“对象”-“确定”，这个时候如果发现有对象，，把它一拉大，原来就是给缩小的图表，于是将图表删除，一切就正常了。
5.上述问题有可能是由于自动缩放字体造成的，解决办法就是修改注册表来预防系统默认自动缩放字体。对于已经存在错误的工作表，可以通过修改图表格式-取消自动缩放字体，或者编制宏命令来解决。%
禁用现有图表中的自动字体缩放
方法（1）：禁用每个图表中的“自动缩放”
1） . 选择一个图表。
2）. 在格式菜单上，单击图表区。
3）. 单击字体选项卡。
4）. 单击以清除自动缩放复选框。
5）. 单击确定。
6）. 为工作簿中的每个图表重复这些步骤。

方法二：以编程方式禁用工作簿中所有现有图表的“自动缩放”
以编程方式禁用工作簿中所有现有图表的“自动缩放”，

请执行下列步骤：1）. 启动 Excel 并打开导致错误信息的文件。
2）. 在“工具”菜单上，指向“宏”，然后单击“Visual Basic 编辑器”（或按 Alt+F11）。
3）. 在 Visual Basic 编辑器中，从“插入”菜单中选择“模块”。
4）. 在模块中键入或粘贴以下代码：

Sub AutoScale_Off()
Dim ws As Worksheet, co As ChartObject, i As Integer
Dim ch As Chart
For Each ws In ActiveWorkbook.Worksheets
' Go through each worksheet in the workbook
For Each co In ws.ChartObjects
'In each chart turn the Auto Scale font feature off
i = i + 1
co.Chart.ChartArea.AutoScaleFont = False
Next co
Next ws
For Each ch In ActiveWorkbook.Charts
'Go through each chart in the workbook
ch.ChartArea.AutoScaleFont = False
i = i + 1
Next
MsgBox i & " charts have been altered"
Application.DisplayAlerts = True
End Sub

5）、点保存按钮保存刚才编写的宏，回到工作簿界面，点击“工具宏宏”，选中 AutoScale_Off（也就是我们刚才编写的宏的名称），点执行即可。

2楼
海洋之星

厉害,这个学习一下,哈哈