是否可以从单个单元格调用多个项目

【问题标题】：Is there away to call Multiple Items from single cell是否可以从单个单元格调用多个项目
【发布时间】：2013-09-29 23:37:28
【问题描述】：

我想知道是否可以从一个单元格中调出多个项目？我的空间非常有限，因此拥有一个包含所有信息的单元格将是一个很大的好处。例如，如果我有一个具有“Dog,2,5,8”的单元格，程序可以运行程序可以告诉它的含义并运行我的计算？提前感谢您的帮助。

【问题讨论】：

可以在VBA中使用Split()分隔逗号上的内容。

标签： excel vba

【解决方案1】：

正如@Tim Williams 所说，Split() 会做你想做的事。

Sub splitcell()
  Dim TestString As String
  TestString = CStr(Range("A3").Value)

  Dim TestArray() As String
  TestArray() = Split(TestString, ", ")

  MsgBox (TestArray(0) & vbNewLine & TestArray(1) & vbNewLine & TestArray(2) & vbNewLine & TestArray(3))
End Sub

宏会给你这个消息框：

现在您可以使用 For 循环遍历 TestArray() 并执行您的逻辑。

请参阅 MSDN 文档here

这是另一个post

【讨论】：