Excel 2007，如何批量删除一列中英文混合单元格中的英文字符（保留中文）或者中文字符（保留英文）？

Question

例如：
sheet纸张
book书本
friend朋友
每一组中英文处于同一个单元格内，我只想保留英文，中文批量一次删除。

Answer 1

假如数据在A列，从A1开始，在B列保留英文，在C列保留中文
在B1中输入：
=LEFT(A1,LEN(A1)*2-LENB(A1))
在C1中输入：
=RIGHT(A1,LENB(A1)-LEN(A1))
然后选择B1和C1,下拉复制
复制B列和C列--原地右击--选择性粘贴--数值
即可

Answer 2

可以通过查找，然后 替代的方法 试一试

Answer 3

用自定义函数：
Function MyGet(Srg As String, Optional n As Integer = False)
Dim i As Integer
Dim s, MyString As String
Dim Bol As Boolean

For i = 1 To Len(Srg)
s = Mid(Srg, i, 1)
If n = 1 Then
Bol = Asc(s) < 0
ElseIf n = 2 Then
Bol = s Like "[a-z,A-Z]"
ElseIf n = 0 Then
Bol = s Like "#"
End If
If Bol Then MyString = MyString & s
Next

MyGet = IIf(n = 1 Or n = 2, MyString, Val(MyString))

End Function

比如数据在A列,在B1写公式:=myget(A1,2)