FlexPro Forum – Discuss Your Topic!

Kommentare auslesen aller Datensätze im Ordner

Home > Community > Automation and VBA > Kommentare auslesen aller Datensätze im Ordner

Viewing 2 posts - 1 through 2 (of 2 total)
  • Author
    Posts
  • #20202
    HannesundCrewHannesundCrew
    Participant

    Hallo,

    ich habe in FlexPro eine .csv-Datei eingelesen, dadurch ist dann ein Ordner entstanden. In diesem Ordner sind jetzt rund 40 Datensätze( in der Objektliste zu sehen) enthalten mit unterschiedlichen Namen. Nun möchte ich von allen Dateien die Kommentare über VBA einlesen und diese dann in eine Liste in VBA ablegen.

    #20559
    Bernhard KantzBernhard Kantz
    Participant

    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.

Viewing 2 posts - 1 through 2 (of 2 total)
  • You must be logged in to reply to this topic.