Excel Tips, Learn Excel \ Raghu R
设置工作簿的格式设置选项
Excel没有提供许多选项来设置工作簿的格式设置默认值。但是，您可以通过修改空白工作簿中的格式设置，然后将其另存为默认模板来解决此问题。
1.将Excel打开到空白工作簿。
1.使用所需的所有选项格式化空白文件。例如，设置边距、单元格颜色格式，或设置页眉或页脚。请确保删除单元格中输入的任何值以测试格式，除非您希望这些值出现在每个空白工作簿中。
1.完成更改后，单击“文件”选项卡，然后选择“另存为”。
1.从“文件类型”下拉列表中，选择“Excel模板（*. xltx）”并将文件名更改为“Book”。

• 将“保存位置”设置为XLSTART文件夹。此文件夹通常位于类似于C:Program Files/Microsoft Office/Office14/XLSTART的路径中。
• 找到其位置的最快方法是使用Visual Basic编辑器（VBE）中的“立即”窗口，如下所示：
• 按Alt + F11启动VBE。
• 如果“立即”窗口不可见，请按Ctrl + G。
• 在“立即”窗口中，键入? application.StartupPath，然后按Enter键。
• VBA将显示XLStart的路径。
• 单击“保存”。
• 退出并重新打开Excel。空白工作簿应包含您以前设置的格式。

设置格式如下：

文件保存后，格式将被保留。

尝试以下操作：

右键单击列并单击Format Cells...，然后从Category:列表中选择Number，并为Decimal places:指定0
保存文件并重新打开，您应该看到该列被设置为Number

• • 编辑：**

如果您想对多个excel文件应用格式设置，您可以为此编写一个宏：
做了一些快速的研究，偶然发现了以下VBA代码---我不认为这是我的功劳。不过我还是修改了DoWork方法来添加：.Worksheets(1).Range("A1").NumberFormat = "Number"

Sub ProcessFiles()
    Dim Filename, Pathname As String
    Dim wb As Workbook

    Pathname = ActiveWorkbook.Path & "\Files\"
    Filename = Dir(Pathname & "*.xls")
    Do While Filename <> ""
        Set wb = Workbooks.Open(Pathname & Filename)
        DoWork wb
        wb.Close SaveChanges:=True
        Filename = Dir()
    Loop
End Sub

Sub DoWork(wb As Workbook)
    With wb
        'Do your work here
        .Worksheets(1).Range("A1").NumberFormat = "Number"
    End With
End Sub

写了一个小宏

Sub PERS_FormatSelectionToNumberNoDecimals()
        Selection.NumberFormat = "0"
    End Sub

... in my PERSONAL. XLSB.
在我的数据工作簿的***ThisWorkbook***模块（VBA编辑器）中，我放置了一个函数

Private Sub Workbook_Activate()
    ' Purpose   :   assign key shortcuts when workbook is activated
        Application.OnKey "^+o", "PERSONAL.XLSB!PERS_FormatSelectionToNumberNoDecimals"
    End Sub

...指定快捷键CTRL-SHIFT-O（O与其他;您可以将您选择的另一个键分配给宏。
=>每当您需要将范围重新格式化为0位小数的数字时，请选择范围并按快捷键。
为了摆脱键分配切换到另一个工作簿时，您可以放置

Private Sub Workbook_Deactivate()
    ' Purpose   :   removes key short cut assignments if workbook is deactivated
        Application.OnKey "^+o"
    End Sub

...在我的数据工作簿的***ThisWorkbook***模块中（VBA编辑器）

我以为数字格式是停留在一个日期，并正在阅读这篇文章，以解决问题时，我意识到以下情况。
在我的情况下，将“主页”功能区中的数字格式更改为“常规”，下次打开Excel（Office 365 Subscription版本）时，“常规”格式将保留！问题解决了
Home Ribbon, Number Format screen capture

如果您希望仅在选择这些样式时才使其生效（即，不是作为创建新文件时的默认格式），则可以在该模板中创建新样式（例如，Book.xltx）。例如，您可以创建一个名为“Currency（0）”的新样式，它等效于正数的样式**$#，##0**。因此，要使用所需的格式，您需要更改单元格的 * 样式 *，而不是使用 * 格式控件 *。
是的，这并不理想（最好能够直接更改Excel的默认功能），但它确实有效。

在Windows 11中，您可以在控制面板中更改默认数字格式。
1.打开控制面板
1.选择“时钟和地区”
1.选择“地区”
1.选择“其他设置”
1.选择“货币”选项卡
1.变更“否。从2到0的小数点后的位数
1.单击“应用”。