PC SOFT

GRUPOS DE DISCUSSÃO PROFISSIONAL
WINDEVWEBDEV e WINDEV Mobile

Inicio → WINDEV 2024 → Utilisation d'un objet OLE Dynamique
Utilisation d'un objet OLE Dynamique
Iniciado por Aurélien MACHABERT, jun., 21 2005 9:55 AM - 1 resposta
Publicado em junho, 21 2005 - 9:55 AM
Bonjour a travers un formulaire de saisie, je voudrais piloter EXCEL en cacher afin de récupérer des prix qui y sont directement calculé.

Je déclare mes variables en globales.

Lors de l'initialisation de la fenêtre je paramètre mon objet et l'ouvre en cacher !!!!

Ensuite, lors de la saisie de n'importe quel champ, je vais écrire sa valeur dans chaque cellules et récupère le prix calculé sur excel pur le faire tranqparaitre sur le formulaire de saisie.

Enfin, à la fermeture, de la fenêtre je ferme ma feuille EXCEL, mais cette syntaxe ne marche pas:

GLOBAL:
Xl est un objet OLE Dynamique
Xl >> ActiveWorkbook >> close

Merci pour vos réponses futurs ainsi que les bouts de code que vous pourraient me donner afin de mieux comprendre la marche à suivre
Publicado em junho, 21 2005 - 3:50 PM
Salut,
Voila un bout de code qui marche aussi bien en locale qu'en globale :

XL est un objet Automation dynamique = ObjetActif("Excel.Application")
SI XL = Null ALORS
XL = allouer un objet OLE "Excel.Application"
SI XL = Null ALORS RETOUR
XL>>visible = OLEFaux
FIN
XL>>Workbooks>>Open("c:\test.xls")
XL >>Application >>DisplayAlerts = False //Evite les boites de dialogues
Info(XL>>range("A1")>>value)
XL>>range("A1")>>value = "TITI"
Info(XL>>range("A1")>>value)
XL>>ActiveWorkbook>>close
libérer XL

A+
PS : Si tu mets les deux dernières lignes en commentaire..tu verras que EXCEL est dans la liste des processus actifs.