Trim and LCase values in an array

[nikki333]

Hi Folks

Trying to trim values in an array, however, I always run into a Runtime Error 13 (Types don't match)

For example, I save a worksheet range in an array like so:

Dim myArr as Variant : myArr = ws.Range("A1:A100")

Then trying to trim:

Dim i as variant
For each i in myArr
Trim(myArr(1,i)
Next i

By the way I'm using Option Base 1.

Strangely, If I try to use Trim on a worksheet, I doesnt raise an error, but neither does it trim

Any ideas?

[SamT]

Runtime Error 13 (Types don't match)

For Each (Item) in an array doesn't work.

Dim i as long
For i = LBound(MyArr) to Ubound(myArr)
   myArr(i) = lCase(Trim(myArr(i)))
Next i

[nikki333]

Thank you Sam, that does the trick DD

[snb]

Sub M_snb()
   sn = [index(trim(lower(A1:A100)),)]
End Sub