@macs46
Mit Formelsprache wird's wohl nicht gehen... da muß schon Script ran.
Im QueryOpenDocument Event der View Continue=False setzen verhindert das Öffnen des Dokumentes. Danach kannst Du dann gern ein neues uidoc öffnen ;) D.h. Du fängst etwa SO an und machst dann weiter. doc ist Dein gewähltes Dokument.
Sub Queryopendocument(Source As Notesuiview, Continue As Variant)
Dim doc As NotesDocument
Dim dc As NotesDocumentCollection
Set dc = source.Documents
Set doc = dc.getFirstDocument
Continue = False
Viel Erfolg!