Sub collect() Dim macoll As New Collection Dim x As Variant x = "hello" macoll.Add Item:=x, key:="1" MsgBox (macoll(1)) x = macoll("1") ...
確定! 回上一頁