VBA: 如何最好地获取一个字符串里的每个字符？
假设有字符串：“world2q3423j;;3254<sflskjdf”现在要获取每个字符到myChars数组，得到这样的结果：myChars(1)=wmyChars(2...
假设有字符串：“world2q3423j;;3254<sflskjdf”
现在要获取每个字符到myChars数组，得到这样的结果：
myChars(1) = w
myChars(2) = o
.... 展开
现在要获取每个字符到myChars数组，得到这样的结果：
myChars(1) = w
myChars(2) = o
.... 展开
1个回答
展开全部
给你段代码
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
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
本回答被提问者和网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
