Filter type mismatch

[vbastruggle]

Hello everyone.

I am trying to filter an array within a sub procedure and get a type mismatch error that I can't figure out.

dim array1
dim find as string

find= "1"
array1= Split("1,2,3,4,5", ",") This creates a one dimension array with a data type variant/string
found = filter(array1,"1") This throws a type mismatch error

Any help would be greatly appreciated. Thanks!

 

[louisH]

You don't use string "find", so it's useless in your code.

    Dim Array1, found As Variant
    
    Array1 = Split("1,2,3,4,5,6", ",")
    found = Filter(Array1, "1")
    
    For Each arr In found
        Debug.Print arr
    Next arr

This worked for me

Can you send the "Split" and "Filter" you are actually doing ?

 

[vbastruggle]

You don't use string "find", so it's useless in your code.

    Dim Array1, found As Variant
    
    Array1 = Split("1,2,3,4,5,6", ",")
    found = Filter(Array1, "1")
    
    For Each arr In found
        Debug.Print arr
    Next arr

This worked for me

Can you send the "Split" and "Filter" you are actually doing ?

I just got it working. Your for each statement got me to realize that the filter returns an array. I knew that in my test I should have only matched on one row so I was expecting a single value and wasn't thinking it would be an array with a single value. Anyhow, it is working now. Thanks!