2011-11-17 113 views

回答

3

它并不那么容易,但我最终得到了一个奇迹般的解决方案!

A1:要搜索的文本

B1:BN:在结果中范围会去

B5:分隔符的文本

=MID($A$1,LEN(CONCAT($B$1:B1))+COUNTA($B$1:B1)*LEN($B$5)+1, 
    SEARCH(
     $B$5, 
     $A$1, 
     LEN(
      CONCAT($B$1:B1)) + COUNTA($B$1:B1)*LEN($B$5)+1) 
      -(LEN(CONCAT($B$1:B1))+COUNTA($B$1:B1)*LEN($B$5)+1)) 

至于现在的作品完美。请注意,您可以使用任何文本作为分隔符。在我的情况下,它是“逗号+空格”。

在哪里的毗连是一个简单的函数,串接的单元格区域:以了解更多信息

Function Concat(myRange As Range) As String 
    Dim r As Range 
    Application.Volatile 
    For Each r In myRange 
    If Len(r.Text) Then 
     Concat = Concat & IIf(Concat <> "", "", "") & r.Text 
    End If 
    Next 
End Function 
1

您可以使用CONCATENATE()&来加入单元格。除非您使用UDF,例如MCONCAT,否则没有范围可以一次抓取。

+0

见[此链接](http://xcell05.free.fr/morefunc/english/mconcat.htm)关于'MCONCAT' – JMax

相关问题