Discussion :

[RATIB]

Bonjour tout le monde,
Quelqu'un pourrait me dire comment convertir un fichier excel en xml.
Existe-t-il un composant dans l'EDI de Delphi? Si oui, alors comment doit-on y procéder? Sinon, alors quelqu'un a déjà travaillé sur ce sujet? et si possible me donner une idée comment m'y prendre?

Merci d'avance.

[ShaiLeTroll]

Excel possède déjà un format XML : XLSX Office Open XML

Le XML n'est pas un format en soit, il te faut en plus une sémantique et un schéma mais Excel en OLE, je crois que SaveAs fourni une version XML voir l'énumération XlFileFormat à la valeur xlXMLSpreadsheet

en reprenant le sujet comment copier les donnés d'une table vers un fichier exel

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
       ExcelOle:= CreateOleObject('Excel.Application');
       try
         ExcelOle.Visible := False;
         ExcelOle.WorkBooks.Open(NomDuFichierExcel);
 
         ExcelOle.ActiveWorkBook.SaveAs(Filename := NomDuFichierXML, FileFormat := 46 (*xlXMLSpreadsheet*));         
      finally
         ExcelOle.Visible := True;
         ExcelOle.UserControl := True;
         ExcelOle := Unassigned;
      end;

[RATIB]

Bonjour,

Merci d'avoir répondu. Au fait ma situation est la suivante:
J'ai un fichier Excel, un DBGrid, un ClientDataSet. J'ai besoin d'importer les données du fichier Excel dans le DataSet et de les visualiser sur le DBGrid, en utilisant la fonction LoadFromFile(). Or pour pouvoir utiliser cette fonction, il faut que le fichier de données soit du xml. Donc, je cherche à savoir s'il n'y a pas un moyen de répondre à ce besoin en passant par fichier xls --> fichier xml --> utiliser clientdataset.LoadFromFile(xml) ==>affichage données sur DBGrid.

PS. Je suis conscient qu'importer des données depuis un fichier Excel dans une base de données et vice-versa n'est pas trop à faire (d'ailleurs je l'ai déjà fait), mais juste trouver une méthode telle est décrite dessus afin de développer moins de lignes de code.

Merci.

[ShaiLeTroll]

Excel fourni un Driver ODBC, utilise ADO pour avoir un DataSet
C'est le plus simple !


Sinon, procède comme je l'ai proposé avec xlXMLSpreadsheet et avec un XSLT tu pourras transformer le XML Excel en un XML Midas (format du TClientDataSet)

Comme je le disais le XML est un format évolutif, la sémantique entre les deux XML peut-être très différente, le XSLT de transformation pourra être pénible à écrire !

le XML sera une solution plus difficile et longue à écrire

[JP.NUAGE]

Bon, cela ne va certainement pas plaire à tout le monde, mais cela fonctionne !

J'ai eu ce problème et je l'ai résolu en lisant le fichier Excel avec Open Office. Et passer de Open Office vers une base est parfaitement décrit dans les FAQ et, je dois le reconnaître, vraiment assez simple.

En plus l'installation de Open Office est simple et gratuite.

Ceci dit, chacun son choix

[RATIB]

Bonjour,

Merci pour les solutions que tu as apportées.