vba - 从同一单元格保存更多值的功能

Question

我有一些可以保存更多值的单元格。一个例子可能是

250;3;1

其中 250 是产品编号，3 是该产品的数量，1 是产品的状态。我想在 Excel VBA 宏中使用这些值。所以我例如得到这些值：

Dim ProdNum as Long
Dim Amount as Long
Dim Status As Long

ProdNum = 250 (product number)
Amount = 3
Status = 1

有什么聪明的方法可以做到这一点，还是我必须使用查找功能或类似的东西？

非常感谢。

标签： vbaexcel

Answer 1

单程：

Sub Several()
    Dim ProdNum As Long, Amount As Long, Status As Long
    arry = Split([A1], ";")
    ProdNum = arry(0)
    Amount =  arry(1)
    Status =  arry(2)
End Sub