Kommentare auslesen aller Datensätze im Ordner

Das folgende Code-Beispiel zeigt die Kommentare der im Ordner “Messung A” enthaltenen Datensätze an.

Public Sub GetComments()
    Dim fld As Folder
    Set fld = ThisDatabase.RootFolder("Messung A", fpObjectTypeFolder)
    Dim obj As DataSet
    Dim res As String
    For Each obj In fld.Objects(fpObjectTypeDataSet)
        res = res & obj.CommentsY & vbCrLf
    Next
    MsgBox res
End Sub

Dies kann leicht auf Ihr Problem angepasst werden.