VBA study notes (7) - vba VBA array functions study notes (7) - vba array functions

Description (2017.3.25):

1. split (str, "-") and join (arr, ",") function, usage almost with other languages.

2. filter function, filter (array, string, true / false) whether a character in the array, the return element composed of an array meet the conditions

Copy the code
'filter function, filter (array, string, true / false) whether a character in the array, the return element composed of an array of the condition 
Public Sub test1 () 
    Dim ARR, arr2 is, ARR3 
    ARR = Application.Transpose (the Range ( "A1: A5")) 
    arr2 is = the Filter (ARR, "rainbow", True) 
    ARR3 = the Filter (ARR, "rainbow", False) 
    . the Range ( "E1") the Resize (the UBound (arr2 is) +. 1) = the Application. TRANSPOSE (arr2 is) 
    the Range ( "F1"). the Resize (the UBound (ARR3) +. 1) = Application.Transpose (ARR3) 
End Sub

Description (2017.3.25):

1. split (str, "-") and join (arr, ",") function, usage almost with other languages.

2. filter function, filter (array, string, true / false) whether a character in the array, the return element composed of an array meet the conditions

Copy the code
'filter function, filter (array, string, true / false) whether a character in the array, the return element composed of an array of the condition 
Public Sub test1 () 
    Dim ARR, arr2 is, ARR3 
    ARR = Application.Transpose (the Range ( "A1: A5")) 
    arr2 is = the Filter (ARR, "rainbow", True) 
    ARR3 = the Filter (ARR, "rainbow", False) 
    . the Range ( "E1") the Resize (the UBound (arr2 is) +. 1) = the Application. TRANSPOSE (arr2 is) 
    the Range ( "F1"). the Resize (the UBound (ARR3) +. 1) = Application.Transpose (ARR3) 
End Sub

Guess you like

Origin www.cnblogs.com/medik/p/10989740.html