Ich werte die folgendermaßen aus
If ndc.Count = 0 Then
Print "no docs found"
Else
Set doc = ndc.GetFirstDocument
While Not ( doc Is Nothing )
Set item = doc.GetFirstItem( "Firma" )
MsgBox item.Text,0,""
Set doc = ndc.GetNextDocument (doc)
Wend
End If
Also wenn ich in den debugger geh steht auch nur ein Dokumnet drin obwohl mehrere Einträge existieren, die mit A beginnen.