Excel macro to get outlook contact info (runtime error/crashing)

Hello,
I have an excel macro to get contact info from outlook 2007

I am getting runtime errors or crashes.

I have created a little test macro to show the problems

You need to add a reference to "Microsoft CDO 1.21 Library" and "Microsoft Outlook 12.0 Object Library"

Please Login or Register  to view this content.

test1 fails
test2 crashes
test3 produces a runtime error

test4 does work because of two facts:
1) error is skipped
2) i = mapiAddressEntries.Count is read
without 2) test4 will fail

thanks