Forum automatisme

Slts,
Pour un besoin ponctuel, j’ai fais une macro Excel pour télécharger les éléments de l’IHM et les afficher sur une feuille Excel
(Alarmes, recettes, Journalisation) pour traitement ou générer des courbes.
Une fois bien lavé, ça peut resservir, la demander si le besoin s'en fait cruellement sentir, LOL

cliquer dessus pour agrandir la photo


Exemple de fonction en VBA pour télécharger les alarmes directement depuis Excel à l’aide de la ligne de commande


Sub Exemple_Telecharger_Elements()
Dim LigneCommande As String
Dim adrsIP As String, lecteur As String, fileNameExe As String, pathCible As String, params As String
Dim RetVal

'Dossier cible
pathCible = "D:\TMP"
'Adresse IP du Magelis
adrsIP = "192.168.1.8"
'Emplacement des données: "Main"=lecteur principal / "Secondary"=Carte mémoire "Optional"=Clef USB
lecteur = "Main"
'Logiciel DataTransferTool
fileNameExe = "C:\Program Files\Schneider Electric\Vijeo-Designer\Vijeo-Frame\DataTransferTool.exe"
'Paramètres pour les Alarmes
params = " -ua -get -" & lecteur & "-remotedatafolder Alarm -localfolder " & pathCible & " -r"


LigneCommande = fileNameExe & " -ip " & adrsIP & params

On Error Resume Next
RetVal = Shell(LigneCommande, 0)
Err.Clear

' Configurer le IHM en Anonyme
' Cible1/Environnement/Securité/Securité du gestionnaire de données=Anonyme

End Sub