如何删除单元格中第一个空格后的所有字符?

dzi*_*lla 3 excel vba excel-2007 excel-vba

我有一个城市名称列表,后面跟着它们在Excel中的一列中所处的状态.如何删除第一个空格后的所有内容,以便城市名称是单元格中唯一剩下的内容?

例如:A1 ="johnson TX"
应该只是A1 ="johnson"

Jea*_*ett 12

我假设你想要一个VBA解决方案,因为你标记了你的问题.

这有效:

Sub KeepCity()
    Dim strCityAndState As String
    Dim strCityOnly As String
    strCityAndState = Range("A1").Value
    strCityOnly = Left(strCityAndState, InStr(strCityAndState, " ") - 1)
    Range("A2").Value = strCityOnly
End Sub
Run Code Online (Sandbox Code Playgroud)

如果你不想要VBA并且想要一个单元格公式,那么@ JToland的答案工作正常,尽管这个更简洁并且不保留尾随空格字符:

=LEFT(A1, FIND(" ",A1)-1)
Run Code Online (Sandbox Code Playgroud)


JTo*_*and 6

做这样的事情

=Mid(A1, 1, Find(" ",A1))
Run Code Online (Sandbox Code Playgroud)

在另一列中应该抓住"" 之前的所有文本.因此,您可以使用所有城市名称构建另一个列,然后您可以将该列用于您的目的.