Dick
It works for me in XL2002 without an error.
Regards,]
Jim Cone
San Francisco, CA

"Dick Kusleika" wrote in message
...
I was pretty sure I knew how collections worked, but why do I get a run time
error (457) with this macro? Doesn't the On Error Resume Next trap that
error? XL2000, Win98SE.
Sub test()
Dim theColl As New Collection
theColl.Add "me", "me"
On Error Resume Next
theColl.Add "me", "me"
On Error GoTo 0
End Sub
Thanks.
Dick Kusleika
MVP - Excel
www.dicks-clicks.com
Post all replies to the newsgroup.