Danke für die Ansätze!
Habs jetzt ganz anders gelöst:
Ich verwende eine Picklist
Set picklist = ws.PickListStrings( 3, False, db.Server, "xxxx.nsf", "PartList", "Artikelkatalog", "Nur zur Ansicht!", 2)
und unterdrücke mittels ErrorHandler alle hier entstehenden Fehler. Da in diesem Skript sonst nichts passiert ist das eine passende Lösung.