Discussion :

[electrosat03]

Salut à tous,

Je sauve un fichier texte créé par la lecture des cellules d'une plage donnée à l'aide de ce code

Code :

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

FileNameTxt = Application.GetSaveAsFilename(VarName_File_Save, "Txt Files (*.txt), *.txt")

Le format des lignes est écrit avec des balises comme un XML afin d'être utilisé avec InDesign.

Tout se passe bien.

Je voudrais pouvoir créer un .XML car je ne peux ouvrir le fichier que par blocnote ou autre mais pas avec IE.

J'ai essayé avec

Code :

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

FileNameTxt = Application.GetSaveAsFilename(VarName_File_Save, "Txt Files (*.XML), *.XML")

Le fichier porte bien l'ext .XML et l'icone du fichier est bien un globe entre <>

Mais lors de l'ouverture du fichier avec IE, il y a une erreur

qui dit que

un caractère incorrect à été trouvé dans le contenu texte...

Comment puis-je faire?

Merci

[kiki29]

Salut,il y a le macro recorder qui donne de façon bestiale

Code :

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

1
2
 
ActiveWorkbook.SaveAs Filename:="C:\Transfert\Classeur1.xml", FileFormat:=xlXMLSpreadsheet

Voir également http://excel.developpez.com/faq/?page=XML
ainsi que http://www.google.fr/#hl=fr&rlz=1R2A...57bd24f3e851ea