例如:
excel | A | B | C |
---|---|---|---|
1 | 數(shù)字1 | 數(shù)字2 | 返回值 |
2 | 1 | 2 | 1、2 |
3 | 1 | 5 | 1怪瓶、2萧落、3、4洗贰、5 |
4 | 1 | 1 | 1 |
要得到返回值找岖,最直觀的方式是使用vba的for循環(huán),遍歷2個數(shù)字之間的所有數(shù)字并添加分隔符
Sub a()
Dim arr, s
arr = [a1].CurrentRegion
For i = 2 To UBound(arr):
s = ""
For j = arr(i, 1) To arr(i, 2):
s = s & j & "敛滋、"
Next
Cells(i, 3).Value = s
Next
End Sub
vba的實(shí)現(xiàn)方式邏輯直觀许布,Excel內(nèi)置函數(shù)如何實(shí)現(xiàn)呢
需要使用函數(shù)TEXTJOIN和INDIRECT
TEXTJOIN(delimiter, ignore_empty, text1, text2),連接字符串
INDIRECT(ref_text, [a1])矛缨,將字符串轉(zhuǎn)為引用
在C2處輸入公式
=TEXTJOIN("爹脾、",,A2,IFERROR(A2+ROW(INDIRECT("1:"&(B2-A2))),))
按鍵盤 ctrl+shift+enter 得到數(shù)組公式,并下拉公式至C4箕昭,即可獲取結(jié)果