excel里面，如何批量删除空格及空格后面的数值？

Question

excel 如果很多行，都有一个共性，比如第1行为abcd 1234,第二行为abef 123456789, 就是中间都有4个空格，我想得出的结果是，第一行为abcd,第二行为abef, 即把空格及空格后面的所有字都删除掉， 请问要如何做，直接用公式行吗，还是要vba程序来做，如何写这个代码？
4的空格是指abcd与1234之间有4个空格。

谢谢大家的回答！

还有补充下： 如果第1行，不规律，不全是4个字母呢，如果第三行为ab cde ef ghijk，想要得出ab cde（即因为cde后面有4个空格，而ab与cde之前只有1个空格就保留）。

Answer 1

　　具体操作步骤如下：

　　1.首先先打开需要删除空格的excel表，打开之后会出现如图所示，这时候将鼠标单击一个对话框，然后移到输入框里面可以看到该单元格的后方有一个空格。

　　2.假如A列都是有空格的，将A列全部选上，选上之后单击“数据”按钮。

　　3.单击数据按钮之后会出现如图所示，此时单击“分列“按钮。

　　4.单击之后会弹出如图对话框，此时单击”下一步“按钮。

　　5.单击之后还是会弹出如图对话框，此时可以看到有一个”空格“选项，在该选项的前面打勾，然后单击”下一步“按钮。

　　6.单击之后会出现如图所示，此时下方的”完成“按钮。

　　7.单击完成按钮之后会回到如图所示，此时可以看到单元格可以计算公式了，而且单元格数值后方的空格已经被批量删除了。

　　

Answer 2

跟你你的要求修改了 你试试吧
用公式需要分3步完成你的要求
假设你的数据在A列,
第一步:在B1输入以下公式向下拖拽填充至最后一行有数据的地方.
=IF(ISNUMBER(FIND(" ",A1)),LEFT(A1,FIND(" ",A1)-1))
第二步选中整个B列,在B1单元格的位置点鼠标右键选复制,再在原地点右键,选 选择性粘贴,弹出窗口后选数值,点确定,
第三步,选中整个B列.在B1单元格的位置点鼠标右键选复制.然后在A1单元格里点右键选粘贴即可
用VBA 的话 代码如下:
Sub 截取4个空格之前()
endrow = Range("A65536").End(xlUp).Row
For i = 1 To endrow
a = InStr(Range("A" & i).Value, " ")
If a > 0 Then Range("A" & i) = Left(Range("A" & i), a - 1)
Next
End Sub本回答被提问者采纳

Answer 3

left解决吗?
再推荐一个方法,可以试试
选中第一列,菜单"数据"/"分列"/分隔符号/下一步/勾选空格/下一步/完成
那么变成
A B
abcd 1234
abef 123456789
abcdef 123456
......
按你补充你再试试以下办法
先查找替换,查找4个空格,替换成一个特殊的符号,如@
然后再执行上述分列的操作,只是把分列符由空格改成@

Answer 4

查找替换就可以。
ctrl+F 查找内容 填 空格*
替换为 填 空格
查找全部 全部替换

我试过了，很好用！希望能帮到你！！

Answer 5

有那么麻烦吗？选中列，按CTRL+H，查找内容为：空格+*，这个不好表述，就是 " *",直接替换，OK。