Hallo,
muss aus der db nur dokumente die eine bestimmte form haben raussuchen und die in die schleife einbinden...
Dim session As New NotesSession
Dim db As NotesDatabase
Dim form As NotesForm
Dim doc As NotesDocument
Set db=session.CurrentDatabase
Set collection=db.AllDocuments()
[color=993300]Set sort=collection.???[/color] ' (AllDocuments die Form "Bericht" haben ???)
Set doc=sort.GetFirstDocument