Problème avec "save as" de Win32

Bonsoir à tous,

Voici ce en quelques lignes ce que je fais dans mon script :

Je créé un fichier.xls, je l'ouvre avec le module Win32::OLE

Code:

---

1 2 3 4 5 6

open(OUT,">fichier.xls"); close OUT; use Win32::OLE; $xlApp = Win32::OLE->new('Excel.Application'); $xlBook=$xlApp->Workbooks->open("C:\\fichier.xls");

---

Je copie certaines données et j'enregistre comme suit :

Code:

---

1 2 3

$xlBook->SaveAs("C:\\fichier.xls"); $xlBook -> Close();

---

Le problème est qu'il enregistre sous 'C:\\fichier.xls' et non C:\\fichier.xls ?!

J'ai mis les " " dans save as car le nom de mon fichier comporte une variable, j'ai essayé avec les ' ' et sans variable, bein ça a donné la même chose.

Est-ce que je peux y remédier ?

Merci bien et à bientôt ;).

H.

Et pourquoi pas utiliser juste save puis un copy ?

Sinon, peux tu reformuler le pb ?
Ton fichier est enregistré sous 'C:\\fichier.xls' et non C:\\fichier.xls, qu'est ce que ça veut dire ?

Bonsoir 50Nio,

Au départ j'ai plusieurs fichiers CSV que je veux mettre en un seul fichier excel.

Donc, quand j'enregistre mon fichier excel il s'enregistre sous le nom de 'fichier.xls', vous remarquerez que l'extension n'est plus .xls et c'est cela qui me pose problème. En fait, avec mon script actuel, je dois moi même faire enregistrer sous et choisir à nouveau le format de mon fichier qui est excel, j'aurais voulu faire ça automatiquement.

Salutations.

H.

Citation:

---

Envoyé par Hoopsy

il s'enregistre sous le nom de 'fichier.xls', vous remarquerez que l'extension n'est plus .xls

---

Le nom du fichier contient les caractères ' dans son nom ?

Quelques idées en vrac:
- tu peux concaténer tout tes csv avant en mode texte
- tu peux tout faire en mode texte et perl, comme ça tu ne dépend pas d'excel; tu génère un csv à la fin avec des séparateur ";" et ça s'ouvre tout seul dans Excel derrière via double clic, que l'extension soit csv ou xls