VBA只保留空格前的单元格值

foo*_*fuu -3 excel vba excel-vba

它看起来像一个简单的代码,但我无法在网上的任何地方找到它,我不知道如何写它.

我想要做的是,例如,单元格范围A1的值为"Hey ho he ha".我想要的代码是在第一个空格之后移除剩余的单词,所以剩下的只有"嘿".

谢谢!

Sid*_*out 7

一行代码......

Range("A1").Value = Split(Range("A1").Value, " ")(0)

另一行代码(基于IolandaAB的答案)

If InStr(1, Range("A1").Value, " ") Then Range("A1").Value = Mid(Range("A1").Value, 1, InStr(1, Range("A1").Value, " ") - 1)

又一行代码

If InStr(1, Range("A1").Value, " ") Then Range("A1").Value = Left(Range("A1").Value, InStr(1, Range("A1").Value, " ") - 1)

拿你的选择:)我最喜欢的仍然是第一个.