>>642
nothingに出来ないってどういう事だ?
以下のコード、間違えてるんだろうか

Sub foo()
Dim a As New Collection
Set a = Nothing
End Sub