Comment faire un VBS qui transforme un .xls en .prn ????Résolu

Question

Bonjour,
Avec une macro on arrive très bien en faire un save du .xls en .prn (fichier texte avec séparateur espace) mais impossible de le faire en VBS.
Le XlFileFormat:=XlText n'existe pas dans en tant que propriété de l'objet SaveAs.
Le but étant d'automatiser la conversion de feuille Excel en Texte sans action utilisateur et sans passer par l'ouverture d'Excel
Si des âmes charitables pouvaient me donner un coup de main ce serait très sympa.

cs_Willi · Accepted Answer

'Lut
Me voici l'&#226;me charitable volant &#224; ton secours 
36 est la valeur de xlTextPrinter (format .prn)

8<-----------------------------------------------------------------------
dim x
dim w


set x = CreateObject("Excel.Application")
set w = x.Workbooks.Open("C:\TonFichier.xls")


w.SaveAs "C:\TonFichier.prn", 36,,,, False


w.Close False
x.Quit

set x = nothing
set w = nothing
----------------------------------------------------------------------->8

cs_Qrieux · Answer

Salut Willi

T'es trop fort !!!
C'est exactement ce que je cherchais ....d&#233;sesp&#233;rement depuis 3/4 jours apr&#232;s avoir &#233;cum&#233; tous les forums de la cr&#233;ation !!!! 

Encore mille fois mer&#231;i !!!

Comment faire un VBS qui transforme un .xls en .prn ????

2 réponses

Discussions similaires