运行一下代码:
SetOptions[$FrontEnd, Magnification -> 1.3];Do[SetOptions[NotebookOpen[i], Saveable -> True, Magnification -> 1.3], {i, FileNames[ "*.nb", $InstallationDirectory <> "\\SystemFiles" <> "\\FrontEnd" <> "\\Palettes", 2]}]; NotebookSave /@ DeleteCases[Notebooks[], InputNotebook[]]; NotebookClose /@ DeleteCases[Notebooks[], InputNotebook[]];