返回列表 上一主題 發帖

[發問]如何將範圍內符合條件的字串合併

Function WLOOKUP(X, xA As Range, xB As Range, SP$) As String
Dim i&, T$
For i = 1 To xA.Rows.Count
  If xA(i) = X Then T = Trim(T & " " & xB(i))
Next i
WLOOKUP = Replace(T, " ", SP)
End Function

公式:
=wlookup("A",C$2:C$11,A$2:A$11," ")
=wlookup(比對值,比對範圍,取值範圍,分隔符號)
 
Xl0000027.rar (11.15 KB)
 
 

TOP

        靜思自在 : 【停滯不前,終無所得】人都迷於尋找奇蹟,因而停滯不前;縱使時間再多、路再長,也了無用處,終無所得。
返回列表 上一主題