Ich habe ein wenig in der Zenon Hilfe gesucht
und habe ein VBA-Beispiel gefunden wie man von einem CEL Bild auf ein AML
Bild umschalten kann und dabei den Zeitfilter des CEL Bildes nutzt.
das ganze habe ich jetzt etwas umgebaut um es für mich nutzen zu können aber ich habe da noch einen Fehler drin.
Sub PrintAML()Dim MyPic As DynPictureDim MyPicFilter As PictureFilterDim MyFuntion As RtFunction Set
MyPic =
thisProject.DynPictures.Item("al_Historical")
'Bild vom Typ "Alarm Message List"Set MyPicFilter = MyPic.PictureFilterSet
MyFunction =
thisProject.RtFunctions.Item("fc_print_AML")
'Funktion vom Typ "Report Viewer export / print"MsgBox ("1")MyFunction.DynProperties("Filter") = MyPicFilter 'Hier muss sich der Fehler befindenMsgBox ("2")MyFunction.StartMsgBox ("3")End Sub
Die Funktion wird komplett ausgeführt und es wird auch ein PDF erstellt. Aber die Filtereinstellungen werden nicht übernommen.
Kann mir jemand helfen wie die Zuweisung des Zeitfilters richtig lautet?