Excel列值,中间有大空格

时间:2013-03-19 08:42:58

标签: excel formula

在excel中,我的内容与下面的内容完全相同。我需要使用excel公式删除所有不必要的信息。只保留-.pdf。

  

1-Abc.pdf是一个包含重要内容的pdf

     

2-Def.pdf是一个包含重要内容的pdf

     

3-Ghi.pdf是一个包含重要内容的pdf

     

4-Jkl.pdf是一个包含重要内容的pdf

我的最终结果如下。

1-Abc.pdf
2-Def.pdf
3-Ghi.pdf
4-Jkl.pdf

请帮忙。我在下面上传了一个示例。 http://www.4shared.com/file/w_BSr62W/Sample.html

1 个答案:

答案 0 :(得分:0)

基本理念如下:

Sub TrimToFirstSpace()
    Dim strHolder As String
    Dim intSlicer As Integer

    strHolder = ActiveCell.Value
    intSlicer = InStr(1, strHolder, " ")

    strHolder = Left(strHolder, intSlicer - 1)
End Sub

如果您愿意,可以将strHolder放入Activecell.Value或其他地方。