Page 1 sur 1
[PCVue] LIAISON SACDA-VBA
Posté : 31 déc. 2022, 15:15
par SART01
Bonjour
Je dois lancer un script scada cyclique (je vais le programmer par evenement cyclique), je vais monter un bit dans le programme scada et je dois récupérer cette info pour lancer un programme en vba. Comment récupérer cette variable et programmer que cette variable execute le programme vba ?
Cordialement merci
Re: [PCVue] LIAISON SACDA-VBA
Posté : 01 janv. 2023, 05:32
par itasoft
slts,
(je vais le programmer par événement cyclique), on peut pas le programmer par conditions ? (par le bit en question)
Re: [PCVue] LIAISON SACDA-VBA
Posté : 04 janv. 2023, 16:50
par FullHotReset
Salut,
Au démarrage, tu peux activer un évènement sur n'importe quelle variable de ton arborescence.
À mettre dans script vb "ThisProject" du Main(Workspace)
Code : Tout sélectionner
Private WithEvents Var1Event As Variable
Private WithEvents Var2Event As Variable
Private Sub fvProject_StartupComplete()
Dim oVar As Variable
Set oVar = Variables("Tree1.Branch1.Var1")
oVar.EnableEvents = True
Set Var1Event = oVar
Set oVar = Variables("Tree1.Branch1.Var2")
oVar.EnableEvents = True
Set Var2Event = oVar
End Sub
Private Sub Var1Event_ValueChange()
If Not CBool(Var1Event.Status And fvVariableStatusGood) Then Exit Sub
' Pif
End Sub
Private Sub Var2Event_ValueChange()
If Not CBool(Var2Event.Status And fvVariableStatusGood) Then Exit Sub
' Paf
End Sub