Discussion :

[christophe9117]

Bonjour,

suite à un export de table vers excel, je cherche à lancer une macro excel depuis windev sans ouvrir excel, voici mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Chemin est une chaîne
Chemin = ("C:\TEMP\FUSION.XLS")
 
// export table vers excel
TableVersExcel(TABLE_CHAMPS_COURRIER,Chemin,taFusion)
 
sNomClasseur est une chaîne
sNomClasseur = "c:\temp\fusion.xls"
sMacro est une chaîne
sMacro = "depligne"
 
 
// pilotage de Excel // executer une macro
clgExcel est un objet CExcel()
 
clgExcel:Ouvrir(sNomClasseur)
clgExcel:m_xExcel>>Run (sMacro)

donc, pour l'instant cela fonctionne parfaitement mais ... excel s'ouvre... je souhaiterais que cela soit transparent, que l'export de table se fasse, puis que la macro se lance sans que excel ne s'ouvre ou alors que excel s'ouvre et se ferme dans la foulée...

Une idée ??

Merci

[hpascal]

Bonjour

...ou alors que excel s'ouvre et se ferme dans la foulée...

en utilisant la méthode :Fermer() de la classe CExcel()

ou >>ActiveWorkbook>>Close(Faux)

[predalpha]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
// Ouverture d'un fichier XLS
IdFichierXLS = xlsOuvre("C:\MesRépertoires\Fichier.XLS")
...
// Fermeture du fichier XLS
xlsFerme(IdFichierXLS)

Je me rappelle d'une ancienne propriété OLEVISIBLE pour qu'excel s'ouvre en background

[sphynxounet]

De mémoire en manipulant l'objet OLE d'Excel, l'application n'est pas censée s'ouvrir ou alors je l'a rendait invisible.

Y a une propriété visible, avec un peu de chance ça doit être : Excel>>Application>>visible = faux
Dans ton cas clgExcel:m_xExcel>>visible = faux

[christophe9117]

c'est presque bon, mais il me manque une donnée :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Chemin est une chaîne
Chemin = ("C:\TEMP\FUSION.XLS")
 
// export table vers excel
TableVersExcel(TABLE_CHAMPS_COURRIER,Chemin,taFusion)
 
sNomClasseur est une chaîne
sNomClasseur = "c:\temp\fusion.xls"
sMacro est une chaîne
sMacro = "depligne"
 
 
// pilotage de Excel // executer une macro
clgExcel est un objet CExcel()
 
clgExcel:Ouvrir(sNomClasseur)
clgExcel:m_xExcel>>Run (sMacro)
 
clgExcel:Enregistrer(sNomClasseur)
 
// on ferme excel
clgExcel:Quitter()

ce code fonctionne mais excel me dit que le fichier existe déjà, et me demande de confirmer l'enregistrement avant de quitter, comment puis je dire à Windev de "supprimer" la confirmation d'enregistrement.

[sphynxounet]

Je crois qu'après avoir enregistré ton classeur il faut le fermer.
Il y a une méthode fermer à la classe.

Mais bon attention quand même, si cette classe permet de manipuler globalement Excel, elle est très loin d'être exhaustive.

[christophe9117]

Merci à tous, voici la solution que j'ai trouvée :

j'ai refait ma macro excel en lui insérant "fichier, enregistrer" puis la notion de clgExcel:m_xExcel>>visible = Faux, et résultat :

mon fichier excel s'ouvre en invisible, la macro s'execute en enregistrant le fichier au passage et excel se ferme.

voici le code définitif :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Chemin est une chaîne
Chemin = ("C:\TEMP\FUSION.XLS")
 
// export table vers excel
TableVersExcel(TABLE_CHAMPS_COURRIER,Chemin,taFusion)
 
sNomClasseur est une chaîne
sNomClasseur = "c:\temp\fusion.xls"
sMacro est une chaîne
sMacro = "macroligne"
 
Ouvre("FEN_import donnees")
 
// pilotage de Excel // executer une macro
clgExcel est un objet CExcel()
 
clgExcel:m_xExcel>>visible = Faux
clgExcel:Ouvrir(sNomClasseur)
clgExcel:m_xExcel>>Run (sMacro)
 
// on ferme excel
clgExcel:Quitter()

Merci à tous !!

[hpascal]

... la macro s'execute en enregistrant le fichier ...

Tu peux aussi regarder le code de ta macro et faire l'équivalent à partir de Windev

Ceci te permettrait de compléter cette classe en fonction de tes besoins

[R&B]

Bonjour.
Sauf nouveauté, Excel ne propose pas de runtime. En revanche il existe ça et la des activeX qui permetront de créer et manipuler les fichier Excel avec des possibilité interessantes sans disposer de la licence Excel sur le poste. Reste que ces composants sont payant et au final quelqu'un doit payer une licence.
D'un autre coté, il est peu judicieux de créer des Xls sans avoir Excel à terme : autant créer des csv.

recherche FormulaOne qui fut une piste en des temps anciens.

[mail.spam]

Bonjour,

Non je suis désolé, à ma connaissance Excel à besoin d'excel.
Les macro que tu crée sous Excel ne sont utile qu'avec les feuilles et les infos présente dans tes feuilles excel.

Si tu veux t'affranchir d'excel il va falloir que tu crée un logiciel à part entière avec Windev ou un autre logiciel de développement.