VBA数据处理之一(字符串)

假设有字符串：“world2q3423j;;3254<sflskjdf”
现在要获取每个字符到myChars数组，得到这样的结果：

myChars(1) = w
myChars(2) = o

Sub aaa()
Dim myChars()
abc = "world2q3423j;;3254<sflskjdf"
ReDim myChars(1 To Len(abc))
For n = 1 To Len(abc)
myChars(n) = Mid(abc, n, 1)
Cells(n, 1) = myChars(n)
Next n
End Sub

---

相关链接

1. VBA: 如何最好地获取一个字符串里的每个字符？)

---

=================我是分割线=================

欢迎到公众号来唠嗑: