Vba macro should run every 1sec without any external trigger from runtime

Vba macro should run every 1sec without any external trigger from runtime

Hi, I am using ZENON 8.20 Version, I need to take The Total no. of alarm values into historian, but it is an Screen specific type function, I am not able to take the value so i am using the VBA macro to take the value into variable, But everytime i need to trigger the function *Execute vba macro* in my case the macro should fetch data every 1 sec, i am attaching my source code, please anyone can help me

Public Sub GetAlarmItems()
Dim zAML As Alarm
Dim zAML_Items As AlarmItems
Dim zAML_Item As AlarmItem

set zAML = thisproject.Alarm

thisproject.Variable.Item("TEST_E").value = zAML.Items.Count

End Sub



How can I modify this program to get data every 1 sec, Here my variable is TEST_E

This is a migrated post! Originally posted on 27.05.2021 by user MOHANLAL. Please be aware that information can be outdated.