在Excel VBA中解析列表？
在Excel VBA中解析列表？
提问于 2020-12-02 08:06:34
我不太熟悉如何将数据分类为数组并使用excel对其进行解析。
下面是我想要做的一个例子：
单元格A1具有["1","2","3"]
我正在尝试创建一个公式，将其转化为
<aa>1</aa><aa>2</aa><aa>3</aa>我不知道如何将单元格A1转换为数组以供VBA循环。
回答 2
Stack Overflow用户
发布于 2020-12-02 08:36:52
不需要VBA。在单元格B1中粘贴以下公式：
=SUBSTITUTE(SUBSTITUTE(MID(A1,2,LEN(A1)-2)&",",""",","</aa>"),"""","<aa>")这是从@JvdV的评论中构建的一个略短的版本。它使用了更少的函数调用...而是更多的字符串连接。
="<aa>"&SUBSTITUTE(MID(A1,3,LEN(A1)-4),""",""","</aa><aa>")&"</aa>"Stack Overflow用户
发布于 2020-12-02 08:14:01
只是手动解析了一下。如果有人有更好的方法，我很乐意学习。谢谢!
Function ParseList(str As String)
str = Replace(str, Chr(34), "")
str = Replace(str, "[", "")
str = Replace(str, "]", "")
Dim LArray() As String
Dim result As String
LArray = Split(str, ",")
For Each word In LArray
ParseList = ParseList & "<aa>" & word & "</aa>"
Next word
End Function页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/65100390
复制相关文章
相似问题
腾讯云开发者
