excel怎么去掉中文只保留英文

在Excel中去掉中文只保留英文，可以通过使用公式、VBA宏、Power Query等方法来实现。以下是使用公式的具体步骤：

使用公式：可以使用Excel的公式来分离出英文字符。
VBA宏：编写VBA代码来自动化处理大量数据。
Power Query：利用Power Query工具进行数据清洗。

公式方法：在Excel中，可以通过一系列的公式来实现只保留英文字符。具体操作如下：

一、公式方法

使用公式提取英文字符

创建辅助列：在原数据旁边插入一个辅助列，用于存放提取后的英文字符。
应用公式：在辅助列中使用以下公式提取英文字符：

=TEXTJOIN("", TRUE, IF(ISNUMBER(SEARCH(MID(A1, ROW(INDIRECT("1:" & LEN(A1))), 1), "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz")), MID(A1, ROW(INDIRECT("1:" & LEN(A1))), 1), ""))

此公式使用了TEXTJOIN、IF、ISNUMBER、SEARCH和MID等函数。TEXTJOIN函数将所有满足条件的字符连接成一个字符串，IF函数用于条件判断，ISNUMBER和SEARCH函数用于判断字符是否为英文字符，MID函数用于提取单个字符。

填充公式：将公式向下填充到需要处理的所有单元格。

二、VBA宏方法

如果需要处理大量数据，可以通过编写VBA宏来实现。

编写VBA宏提取英文字符

打开VBA编辑器：在Excel中按Alt + F11打开VBA编辑器。
插入模块：在VBA编辑器中，点击插入 -> 模块，插入一个新模块。
编写代码：在模块中输入以下代码：

Sub RemoveChinese()
    Dim rng As Range
    Dim cell As Range
    Dim i As Long
    Dim str As String
    Dim char As String
    ' 设置需要处理的范围
    Set rng = Selection
    For Each cell In rng
        str = ""
        For i = 1 To Len(cell.Value)
            char = Mid(cell.Value, i, 1)
            If Asc(char) < 128 Then
                str = str & char
            End If
        Next i
        cell.Value = str
    Next cell
End Sub

运行宏：选择需要处理的单元格区域，然后按Alt + F8打开宏对话框，选择RemoveChinese宏并运行。

三、Power Query方法

Power Query是Excel中的一种强大数据处理工具，可以方便地进行数据清洗。

使用Power Query提取英文字符

加载数据到Power Query：在Excel中选择数据区域，然后点击数据 -> 从表/范围加载数据到Power Query。
添加自定义列：在Power Query编辑器中，点击添加列 -> 自定义列，输入以下公式：

Text.Select([Column1], {"A".."Z", "a".."z"})

其中[Column1]是需要处理的列名。

删除原始列：在Power Query编辑器中，选择原始列并删除。
加载数据回Excel：点击关闭并加载将处理后的数据加载回Excel。

总结

通过公式、VBA宏和Power Query三种方法，可以在Excel中高效地去掉中文字符只保留英文字符。公式方法适用于简单的数据处理，VBA宏方法适用于需要批量处理大量数据的情况，而Power Query方法则提供了更为直观和灵活的数据处理方式。根据实际需求选择合适的方法，可以提高工作效率，确保数据处理的准确性。