|
Convert an array to lower case
'first join all elements, separated by a delimiter of your choice - "++++" In this example
'Then make the entire string lower case
'finally, use split to take apart the string and place it In an array
Dim
temp
As
String
, MyArray
As
Variant
temp
=
Join(Myarray,
"++++"
)
temp
=
Lcase
$(temp)
MyArray
=
Split(temp,
"++++"
)
'here Is a second approach
Dim
i
As
Long
For
i
=
0
To
Ubound
(MyArray)
MyArray(i)
=
Lcase
$(MyArray)
Next
i
|