Excel 如何拆分字符串并将唯一值存储到数组中

有人能帮我在下面创建一个excel vba代码吗

对于第2列序列中的每个单元格，我想用逗号拆分一个字符串，并将唯一的字符串存储在数组中，然后将结果填充到第4列

很抱歉，我无法附加照片，出现错误，以下是详细信息

column 2
row 1 - R001,R002,R003,R004
row 2 - R003,R004,R005,R006
row 3 - R006,R009,R010,R011

column 4 (result should be)
row 1 - R001
row 2 - R002
row 3 - R003
row 4 - R004
row 5 - R005
row 6 - R006
row 7 - R009
row 8 - R010
row 9 - R011

---

查看以下链接

---

为了好玩，我想看看这是否可以通过工作表公式实现

如果碰巧有O365与FILTERXML和TEXTJOIN函数，则可以使用以下公式：

=IFERROR(INDEX(FILTERXML("<t><s>" & SUBSTITUTE(TEXTJOIN(",",,$A$1:$A$3),",","</s><s>") & "</s></t>","//s[not(. = preceding::*)]"),ROWS($1:1)),"")

算法：

用逗号分隔符连接相关单元格 从文本中创建XML，节点之间用逗号分隔。 如果节点前面没有相同的节点，则使用xPath参数仅返回该节点

---

向我们展示您的尝试，以及您遇到的问题。阅读帮助页面以获取有关和的信息可能会有所帮助。首先，您所附的照片似乎丢失了。第二，你能告诉我们你是如何做到这一点的吗？你在哪里陷入了困境？如果您没有尝试解决自己的问题，并且可能没有收到答复。对不起，我无法附上照片，我不知道为什么。我编辑了描述。这很有帮助，但应该是一个注释