Excel小数点怎么删除？如何彻底清除？

作者：佚名|分类：EXCEL|浏览：102|发布时间：2025-03-16 23:12:43

在Excel中，小数点的处理是日常工作中常见的问题。有时候，我们可能需要删除单元格中的小数点，以便进行数据整理或者格式调整。以下是一些常见的方法来删除Excel中的小数点，以及如何彻底清除小数点。

一、手动删除小数点

1. 选中单元格：首先，选中包含小数点的单元格。

2. 删除小数点：直接使用键盘上的删除键（Backspace）或者删除按钮（Delete）来删除小数点。

二、使用公式删除小数点

如果你需要删除多个单元格中的小数点，可以使用以下公式：

1. 选中单元格区域：选中需要处理的单元格区域。

2. 输入公式：在编辑栏中输入以下公式：

```excel

=SUBSTITUTE(A1,".","")

```

其中，A1是包含小数点的单元格引用。

3. 确认公式：按下回车键，公式会自动将选中单元格区域中的小数点删除。

三、使用查找和替换功能

1. 选中单元格区域：选中需要处理的单元格区域。

2. 查找和替换：点击“开始”选项卡中的“查找和替换”按钮，或者按下`Ctrl + H`快捷键。

3. 查找内容：在“查找和替换”对话框中，切换到“查找”选项卡，将“查找内容”设置为“.”（小数点）。

4. 替换为：在“替换为”框中保持空白，点击“全部替换”按钮。

5. 确认替换：系统会提示你确认替换所有找到的内容，点击“是”确认。

四、使用VBA脚本删除小数点

如果你需要批量处理大量数据，可以使用VBA脚本来自动删除小数点。

1. 打开VBA编辑器：按下`Alt + F11`打开VBA编辑器。

2. 插入模块：在VBA编辑器中，右键点击“VBAProject（你的工作簿名称）”，选择“插入” -> “模块”。

3. 编写脚本：在打开的模块窗口中，输入以下VBA代码：

```vba

Sub DeleteDecimalPoints()

Dim ws As Worksheet

Dim cell As Range

Set ws = ThisWorkbook.Sheets("Sheet1") ' 修改为你的工作表名称

For Each cell In ws.UsedRange

If InStr(cell.Value, ".") > 0 Then

cell.Value = Replace(cell.Value, ".", "")

End If

Next cell

End Sub

```

4. 运行脚本：关闭VBA编辑器，回到Excel界面，按下`Alt + F8`，选择“DeleteDecimalPoints”，点击“运行”。

五、如何彻底清除小数点

如果你想要彻底清除单元格中的小数点，包括隐藏的小数点（例如，通过格式设置显示为整数），可以使用以下方法：

1. 选中单元格区域：选中需要处理的单元格区域。

2. 设置单元格格式：右键点击选中区域，选择“设置单元格格式”。

3. 数字分类：在“设置单元格格式”对话框中，选择“数字”类别。

4. 自定义格式：点击“自定义”，在“类型”框中输入“0”或者“”来清除小数点。

5. 确认格式：点击“确定”应用新的格式。