Index使用Index函數(shù)可以調(diào)用數(shù)組里的指定位置的元素數(shù)據(jù)。 WorksheetFunction.Index(Array, row_num, col_num) 其中:
舉個例子,,我們有一個二維數(shù)組Arr(0 to 2, 0 to 3),我們?nèi)绻胍@取arr(1,3)的值,,就可以使用下面語句 WorksheetFunction.Index(Arr, 2, 4) 如果col_num 設置為0,那么就代表取出對應row_num的整行數(shù)據(jù),。反之,,如果row_num 為0,就代表要取整列數(shù)據(jù),。 Sub ArrayFunctions1()
Dim Arr()
Arr = [a1].CurrentRegion.Value
Debug.Print WorksheetFunction.Index(Arr, 2, 3)
Arr_Col = WorksheetFunction.Index(Arr, 0, 1)
Arr_Row = WorksheetFunction.Index(Arr, 1, 0)
End Sub 結(jié)合本地窗口,,我們可以更清楚的看到新的數(shù)組賦值結(jié)果。 Join用于把數(shù)組中的字符串使用給定的連接符連接起來,。使用方法為 Join(sourcearray[, delimiter]) 其中array為要連接的數(shù)組,,delimiter為指定的字符串,如果忽略,,則默認為空格,。 Debug.Print Join(Array('str1', 'str2', 'str3', 'str4'))
Debug.Print Join(Array('str1', 'str2', 'str3', 'str4'), 'x') 上面代碼分別使用了空格(忽略delimiter),以及x連接了字符串數(shù)組,,返回結(jié)果分別為: str1 str2 str3 str4
str1xstr2xstr3xstr4
Join(Array(11.1, 'a', 3)) 返回 11.1 a 3 總結(jié)一下
|
|
來自: L羅樂 > 《數(shù)組公式》