Du kannst das über eine Ansicht machen. Die Ansicht muss die Eigenschaft haben, Antwortdokumente nicht hierarchisch anzuzeigen.
Selektionsformel der Ansicht: @IsAvailable ($REF)
Erste sortierte Spalte: @Text ($REF)
In der Ansicht kannst Du mit der UniversalID des Elterndokuments suchen.
Ohne Ansicht geht das auch über eine NotesDatabase.Search (|@Text ($REF) = "| & doc.UniversalID & |"|, Nothing, 0), ist aber natürlich langsamer.
Oder Du nimmst Bernhards Vorschlag, aber der ist viel zu einfach
...