Dick,

I don't get that error, it steps through nicely. XL2000, XP.

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

"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.