PDA

View Full Version : [SOLVED] Trim and LCase values in an array



nikki333
04-21-2018, 10:40 AM
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
04-21-2018, 10:59 AM
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
04-21-2018, 11:12 AM
Thank you Sam, that does the trick :DDD

snb
04-21-2018, 12:01 PM
Sub M_snb()
sn = [index(trim(lower(A1:A100)),)]
End Sub