[R] fichier XLS non enregistré

[aulus]

Bonjour,

Ce code n'enregistre pas le fichier de type Excel que je compte créer. Quelle en est la raison ? Bien qu'ayant opté pour Alert=1, je n'obtiens pas de message d'erreur.

Code : Tout sélectionner

#include <Excel.au3>
Global $cheminExport = @ScriptDir & "\exportation\"
Global $excel = "essai.xls"
Global $tableau = _ExcelBookNew()

For $i = 1 To 20
    _ExcelWriteCell($tableau, "ligne "  & $i, $i, 1)
Next

_ExcelBookSaveAs($tableau, $cheminExport & $excel, "xls", 1, 1)
_ExcelBookClose($tableau)
 

Je vous remercie.

[jguinch]

J'ai testé sur mon poste (Office 2013 32 bits), ça fonctionne bien.

[DimVar]

Bonjour,

Testé sur office 2010 EN => OK.

Cdlt.

[aulus]

Du fait que mon code fonctionnait sur vos ordis, j'en ai déduit que mon Excel devait avoir des problèmes. J'ai donc réinstallé ce dernier, et maintenant ça marche.

Merci à vous pour votre retour de test.

[aulus]

J'ai parlé un peu trop vite...
J'obtiens maintenant ce message d'erreur dans la console :

C:\Program Files (x86)\AutoIt3\Include\Excel.au3 (356) : ==> The requested action with this object has failed.:
If $sPassword = "" And $sWritePassword = "" Then $oExcel.ActiveWorkBook.SaveAs($sFilePath, $sType, Default, Default, Default, Default, $iAccessMode, $iConflictResolution)
If $sPassword = "" And $sWritePassword = "" Then $oExcel.ActiveWorkBook.SaveAs($sFilePath, $sType, Default, Default, Default, Default, $iAccessMode, $iConflictResolution)^ ERROR

Qu'est-ce que cela peut bien signifier ? Qu'est-ce qui peut bien contrarier l'enregistrement du fichier ?

[jguinch]

Est-ce que le répertoire Exportation existe ?

[aulus]

Oui, il existe.

Est-ce que ce problème peut être dû à des virgules, des apostrophes, ou d'autres caractères présents dans les données à enregistrer ?

J'utilise Excel d'Office 2007... Y aurait-il un lien avec l'erreur ?

[mikell]

J'ai cette erreur si le dossier de destination n'existe pas, sinon ça marche avec le code cy-dessus
Excel 2003

[aulus]

Et pourtant mon dossier de destination existe...

La question a été soulevée dans le fil : http://www.autoitscript.fr/forum/viewto ... =3&t=10899

On parle d'un pack écrit par Tlem avec un lien. Mais j'avoue que ne comprends pas son emploi...

[aulus]

Je n'ai plus l'erreur si je code sans la variable $cheminExport et le fichier Excel est bien créé dans le dossier (ce qui n'avait pas lieu avec l'ancien code) :

Code : Tout sélectionner

_ExcelBookSaveAs($Base_xls, @ScriptDir & "\exportation\" & $excel, "xls")

[aulus]

J'ai observé que j'obtiens l'erreur ci-dessous lorsqu'un fichier de même nom est déjà ouvert dans Excel :

C:\Program Files (x86)\AutoIt3\Include\Excel.au3 (356) : ==> The requested action with this object has failed.:
If $sPassword = "" And $sWritePassword = "" Then $oExcel.ActiveWorkBook.SaveAs($sFilePath, $sType, Default, Default, Default, Default, $iAccessMode, $iConflictResolution)
If $sPassword = "" And $sWritePassword = "" Then $oExcel.ActiveWorkBook.SaveAs($sFilePath, $sType, Default, Default, Default, Default, $iAccessMode, $iConflictResolution)^ ERROR