[C#] Créer un fichier Excel

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : [C#] Créer un fichier Excel

Arjuna

Aircraft Ident.: F-MBSD

Salut,

J'arrive pas à trouver un moyen pour créer un document Excel à partir d'une application écrite en C#.

J'ai toujours la solution du csv, ou du fichier html renommé en xls, mais je préfèrerais faire un truc simplement.

Sauf que j'ai plusieurs soucis :
- Je ne trouve de la doc que pour faire de l'automation avec Office 10 ou 11 (il y a des offices 97 et 2000 -Office 7 & 8- encore là où l'appli va être déloyée)
- Moi j'ai la 2003 (11), sauf qu'il me manque les "PIA" d'Excel. Et impossible de trouver où les télécharger (y'a un lien dans la MSDN, mais ça tombe sur une liste de dwl qui n'ont rien à voir)

Vous avez une idée ?
Reste la solution de déployer la solution avec un VBS, qui récupère les données d'un fichier XML, et qui bidouille dans Excel comme un grand -ça y'a pas de problème avec WSH- mais ça me lourde les bidouillages, après je comprends plus rien à ce que j'ai fait

Message cité 1 fois

Publicité

the big ben

Tu est en .NET? Sinon j'ai trouve un composant appele CarolsAg qui est pas mal du tout!

Arjuna

Aircraft Ident.: F-MBSD

Yes, je suis en .NET

Arjuna

Aircraft Ident.: F-MBSD

Je trouve rien sur le net à propos de CarolsAg

La solution du VBS :

Code :

Option Explicit
Sub test()
Dim xls
Dim wkb
Dim sht
Set xls = CreateObject("Excel.Application" )
Set wkb = xls.Workbooks.Add()
Set sht = wkb.Sheets.Add()
sht.Cells(1, 1).Value = "test"
sht.Cells(1, 2).Value = "1"
sht.Cells(1, 3).Value = "2"
sht.Cells(1, 4).Value = "=R1C2+R1C3"
xls.Visible = True
End Sub
Call test()

Pkoi on peut pas faire simplement aussi en C# ? :cry:
Je sens que je vais m'amuser encore... Pis à débuger, ça va encore être la misère tiens...

Arjuna

Aircraft Ident.: F-MBSD

Bon ben...

Code :

private void button2_Click(object sender, EventArgs e)
{
Object foo = null;
IWshRuntimeLibrary.WshShellClass shell = new IWshRuntimeLibrary.WshShellClass();
shell.Run(@"c:\excel.vbs", ref foo, ref foo);
}

Avec le fichier VBS qui recherche les donnés dans un fichier XML qui va bien... Mon dieu que c'est crade Mais au moins ça marchera quelque soit la version d'Excel...

moi23372

pour Carlos AG il s'agit de produire des fichiers EXCEL au format XML. Ces fichiers ne sont lisibles qu'avec EXCEL 2003 puisque ce format est apparu avec Microsoft Office 2003.
L'avantage d'une telle solution de reporting est qu'il ne fait pas avoir microsoft Excel sur la machine pour produire les XML compréhensible par EXCEL.
CarlosAg à produit une lib permettant de générer facilement un fichier au format XML.

plus d'infos ici sur ce format:
http://www.labo-dotnet.com/Article [...] /1547.aspx

Message cité 1 fois

the big ben

on peut pas dire que tu ai cherché beaucoup alors pcq le premier lien sur google c'est celui la!
http://www.carlosag.net/Tools/Exce [...] fault.aspx

the big ben

en fait ton fichier peut avoir l'extention xls avec ca aussi mais il sera effectivement en xml et donc lisible sous Excel 2003

Xas

Freshershist

Hmmm, Excel sous .NET ça pose pas de problème, si ?

Code :

' J'ouvre
m_oExcel = New Excel.Application
' Je mets une valeur
mySheet.Range(maCellule).Value = maValeure
' Je récupère une valeur
Dim objResult As Object = maFeuille.Range(maCellule).Value

Ca reste l'appel aux objets classiques en C.
Excel.Application, puis le WorkBook, puis les Worksheets, ...

Message cité 1 fois

---------------
H. - 48h en fiat et j'ai déjà perdu la maitrise de mon argent

moi23372

le problème avec ole automation c'est que si ça plante, c'est un plantage massif... alors qu'avec la lib, c'est plus performant et ça ne plante pas puisque c'est que de la construction d'xml

Message cité 2 fois

Publicité

the big ben

de plus l'ole est souvent fort lent...

Arjuna

Aircraft Ident.: F-MBSD

moi23372 a écrit :

ouais, ok, donc ça m'intéresse pas

je sais écrire ces fichiers à la main, donc passer par un objet ne me sert à rien. et surtout, faut que Excel 97 puisse les relire...

Arjuna

Aircraft Ident.: F-MBSD

Xas a écrit :

Hmmm, Excel sous .NET ça pose pas de problème, si ?

Code :

' J'ouvre
m_oExcel = New Excel.Application
' Je mets une valeur
mySheet.Range(maCellule).Value = maValeure
' Je récupère une valeur
Dim objResult As Object = maFeuille.Range(maCellule).Value

Ca reste l'appel aux objets classiques en C.
Excel.Application, puis le WorkBook, puis les Worksheets, ...

ouais, sauf que "Excel.Application", pas moyen de trouver la référence à mettre. J'ai essayé les libs .NET (Office.Tools) et les objets COM (Excel 5.0 et Excel 11.0 -me demandez pas pkoi il y a des bouts de Excel 5.0 sur mon 2003 Server -)
Du coup, je ne peux rien faire. En plus, il me gueule dessus parcequ'il manque une référence "Microsoft.Office.Interop", sauf que je n'ai pas cette référence... Don't know why.

Et sinon, ça revient au même que mon VBS, sauf qu'avec "CreateObject", l'intérêt, c'est que je ne suis pas les poings liés avec la version référencée dans mon code : il prends la version de l'objet qui se trouve sur le PC de l'utilisateur. Ca m'évite de déployer 25 versions différentes de mon EXE (et d'installer 25 versions différentes d'Office sur mon PC...)

Message édité par Arjuna le 28-04-2006 à 15:47:03

Arjuna

Aircraft Ident.: F-MBSD

moi23372 a écrit :

le problème avec ole automation c'est que si ça plante, c'est un plantage massif... alors qu'avec la lib, c'est plus performant et ça ne plante pas puisque c'est que de la construction d'xml

Oui, mais relis mon premier post : XML = interdit. Je suis le seul dans toute la boîte à avoir Office 2003.
Sinon, j'aurais même pas posé la question : j'aurai utilisé le format XML d'entrée de jeu, c'est un vrai bonheur à utiliser, d'autant qu'on peut y inclure des macro autrement que sous forme de *.mso liés au fichier (on fout direct le code de la macro dans une balise spécifique et zou)

Message édité par Arjuna le 28-04-2006 à 15:48:19

Xas

Freshershist

C:\WINDOWS\assembly\GAC\Microsoft.Office.Interop.Excel\11.0.0.0__71e9bce111e9429c\Microsoft.Office.Interop.Excel.dll
C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\office.dll

J'ai que ça dans mes références et ça fonctionne...

Message cité 1 fois

---------------
H. - 48h en fiat et j'ai déjà perdu la maitrise de mon argent

moi23372

ah excuse moi... j'ai lu en diagonale. Dans ce cas la il te reste ole automation. Pas trop le choix...

Sinon une autre solution consisterait tout de même à créer le fichier EXCEL en xml et de reconvertir ensuite avec XSL-FO vers un fichier Excel Classique... Mais sincèrement je crois pas que ça changerait bcp que de faire directement tout en ole automation.

Message cité 1 fois

Xas

Freshershist

moi23372 a écrit :

le problème avec ole automation c'est que si ça plante, c'est un plantage massif... alors qu'avec la lib, c'est plus performant et ça ne plante pas puisque c'est que de la construction d'xml

Suffit de faire une petite classe qui gère les E/S avec Excel.
Un petit try/catch quand on accède aux données et quand ça plante, ben on est toujours sain et sauf coté référence.

Message cité 1 fois
Message édité par Xas le 28-04-2006 à 16:05:48

---------------
H. - 48h en fiat et j'ai déjà perdu la maitrise de mon argent

Arjuna

Aircraft Ident.: F-MBSD

Xas a écrit :

A priori, il me manque le premier. Je ne sais pas pkoi. Quand je fais "add reference", il n'est pas présent.

Arjuna

Aircraft Ident.: F-MBSD

moi23372 a écrit :

Ca va surtout être la grosse prise de tête

Avec OLE, ça devrait aller.
Je récupère mon DS. J'en fait un "WriteXml", je passe en paramètre à mon VBS le fichier généré.
Je le parse avec MSXML dans le VBS, et je construis dynamiquement mon document Excel via une instance d'Excel ouverte.
Quand j'ai fini, j'affiche la fenêtre et je rends la main au programme.
Comme ça le gus choisi d'enregistrer ou non le fichier, et l'appli peut continuer à tourner pendant ce temps. C'est à la limite mieux qu'avec une lib, parceque Excel est directement ouvert avec le fichier comme ça

Couche de décodage du flux XML à part, j'ai testé et ça marche. Je termine le reste de l'appli, et après je passe à ça. Je vais plus être emmerdé par l'absence d'IDE pour VBS (pratique pour retrouver le nom des méthodes d'un objet créé avec "CreateObject" ) qu'autrechose, pour le reste ça va marcher comme une bête acro Excel (d'ailleurs, je crois que je vais commencer par le faire sous forme de Macro avant d'en faire un VBS).

Arjuna

Aircraft Ident.: F-MBSD

Xas a écrit :

Suffit de faire une petite classe qui gère les E/S avec Excel.
Un petit try/catch quand on accède aux données et quand ça plante, ben on est toujours sain et sauf coté référence.

Borf, un bon gros "On Error Resume Next" dans mon VBS et c'est bon
En plus, l'intérêt c'est que le VBS sera appelé par un Shell.Run() donc même s'il plante, ça foutra pas en l'air mon appli, qui tourne dans un processus totalement séparé

Message édité par Arjuna le 28-04-2006 à 16:12:19

Arjuna

Aircraft Ident.: F-MBSD

Bon, pour ceux que ça intéresse, je suis donc finalement arrivé à la phase de développement où je pouvais plus faire sans cette fonctionnalité

Du coup j'ai torché ça en 1 heure, ça marche pour moi. C'est à complèter, mais ça pourrais aider à démarrer une personne bloquée comme moi.

Code :

Option Explicit
' Titre : DS2XLS
' Auteur : MagicBuzz
' Version : 1.0
' Date : 10-05-2006
'
' Script VBS qui génère un document Excel à partir d'un extract "ToXml()" d'un Objet DataSet de .NET
' Ce script est censé fonctionner sur n'importe quelle version de Windows, et n'importe quelle version d'Excel
' Bon, rien n'est garanti non plus hein...
' Constantes
' Ces GUID génériques ont l'avantage d'être idetiques pour toutes les versions
' Il faut alors faire confiance à Microsoft pour ne pas changer la structure des objets d'une version à l'autre
Const EXCEL_GUID = "Excel.Application"
Const MSXML_GUID = "MSXML.DOMDocument"
' Méthodes
Sub Main()
' Excel objects
Dim xls
Dim wkb
Dim sht
' DOM objects
Dim dom
Dim declaration
Dim table
Dim colonne
Dim ligne
' Common variables
Dim tabName
Dim arrColonnes()
' Compteurs
Dim i
Dim j
' Création d'une instance d'Excel
Set xls = CreateObject(EXCEL_GUID)
' On ne l'affiche pas
'xls.Visible = True
' Ajout d'un espace de travail (par défaut, Excel s'ouvre vide)
Set wkb = xls.Workbooks.Add()
' L'espace de travail contient de base 3 sheets. On en vire deux et on renomme la dernière
' En effet, un espace de travail doit au moins toujours contenir une feuille...
For i = wkb.WorkSheets.Count To 2 Step -1
wkb.WorkSheets(i).Delete
Next
wkb.WorkSheets(1).Name = "tmpSheet"
' Ouverture du document XML contenant les données du dataset à sauvegarder
Set dom = CreateObject(MSXML_GUID)
dom.Load "export.xml"
' Recherche du tag de description des DataTables
Set declaration = dom.DocumentElement.SelectNodes("xs:schema/xs:element/xs:complexType/xs:choice/xs:element" )
' C'est parti !
For Each table In declaration
tabName = GetAttributeByName(table, "name" )
Set sht = wkb.WorkSheets.Add()
sht.Name = tabName
ReDim arrColonnes(1)
i = 0
For Each colonne In table.SelectNodes("xs:complexType/xs:sequence/xs:element" )
i = i + 1
ReDim Preserve arrColonnes(i)
' En-tête
arrColonnes(i) = GetAttributeByName(colonne, "name" )
sht.Cells(1, i).Value = GetAttributeByName(colonne, "name" )
sht.Cells(1, i).Interior.ColorIndex = 36
sht.Cells(1, i).Font.Bold = True
' Formattage du type de la colonne
Select Case GetAttributeByName(colonne, "type" )
Case "xs:string"
sht.Columns(i).NumberFormat = "@"
Case "xs:decimal"
sht.Columns(i).NumberFormat = "0.00"
Case Else
' Ouais, ben désolé, moi je me sert que de string et decimal...
sht.Columns(i).Interior.ColorIndex = 3
MsgBox("Type inconnu : " & GetAttributeByName(colonne, "type" ))
End Select
Next
' Maintenant, on parcours l'ensemble des éléments correspondant au datatable en cours de lecture
j = 1
For Each ligne In dom.DocumentElement.SelectNodes(tabName)
j = j + 1
For i = 1 To UBound(arrColonnes)
' On recopie bêtement le contenu du tag portant le nom de la colonne désirée
sht.Cells(j, i).Value = ligne.SelectSingleNode(arrColonnes(i)).Text
Next
Next
' Ca c'est pour faire joli (si faire se peut)
sht.Columns.EntireColumn.AutoFit
Next
' Vous vous rappelez de la sheet renommée ? Ben on la zigouille maintenant
wkb.WorkSheets("tmpSheet" ).Delete
' On indique qu'on ferme l'espace de travail en enregistrant le document (une popup d'enregistrement apparaît)
wkb.Close(true)
' On quitte Excel
xls.Quit
End Sub
Function GetAttributeByName(node, attributeName)
' Impossible d'utiliser les collections nommées en VBS. Du coup on fait avec les moyens du bords...
Dim tmpRet
Dim att
tmpRet = ""
For Each att in node.attributes
If att.Name = attributeName Then
tmpRet = att.Value
Exit For
End If
Next
GetAttributeByName = tmpRet
End Function
' Démarrage du programme
Call Main()

alien_nan

sinon :
ftp://ftp2.developpez.be/developp [...] ficeCs.pdf

c'est un pdf qui explique comment generer des docs office au sens large

ixemul

Nan mais sans blague ! ⚡

Perso, j'utilise la librairie Koogra sur sourceforge, totalement independante d'excel (aucunement besoin d'avoir office sur la machine). Par contre, faut se faire la grille à la mano

Arjuna

Aircraft Ident.: F-MBSD

Merci pour le lien

Par contre, même si c'est crade, je conserve ma version : ton exemple repose sur les COM "de base" c'est à dire que je dois lier la DLL à ma version d'Excel.

Résultat, si je veux que l'appli soit compatible avec plusieurs versions d'Office, je dois installer chaque version d'Excel sur mon poste, puis compiler une version de mon programme pour chaque version d'Excel.
Je préfère donc utiliser mon bignou à deux balles, qui :
-> Instancie depuis C# un environnement de commande, quelle que soit la version de Windows
-> Lance Excel et joue dedans, quelle que soit la version d'Office

Bon, après, je suis d'accord, ça reste un bon gros script de grand-mère mais bon, on peut pas tout avoir...

breizhbugs

Citation :

' Constantes' Ces GUID génériques ont l'avantage d'être idetiques pour toutes les versions' Il faut alors faire confiance à Microsoft pour ne pas changer la structure des objets d'une version à l'autre
Const EXCEL_GUID = "Excel.Application"

Si tu regardes la base des registres, tu verras que [HKEY_CLASSES_ROOT\] Excel.Application [\CurVer] pointe vers la version qui est installé sur l'ordinateur
Donc no soucay pour les versions suivantes.

Message édité par breizhbugs le 10-05-2006 à 15:00:28

Arjuna

Aircraft Ident.: F-MBSD

Ben oui justement
Ce qui permet de distribuer le même script quelle que soit la version installée.
Le programme est capable de retrouver la DLL un peut comme l'association des fichiers : on installe un nouvel outil qui se déclare comme étant le destinataire de cet appel et hop ! pas besoin de changer les liaisons dans le programme

KibitO

Arjuna a écrit :

Moi j'ai la 2003 (11), sauf qu'il me manque les "PIA" d'Excel. Et impossible de trouver où les télécharger (y'a un lien dans la MSDN, mais ça tombe sur une liste de dwl qui n'ont rien à voir)

Vous avez une idée ?

http://support.microsoft.com/defau [...] r%3B897646

Tu pouvais les créer toi aussi à partir des fichiers .tlb correspondants et l'outils TlbImp fourni avec Microsoft Visual Studio .NET..

Publicité

FORUM HardWare.fr

Programmation

C#/.NET managed

[C#] Créer un fichier Excel

Sujets relatifs
[vba Excel 97]	sous excel séparer les éléments d'une cellule selon un "/"
Lancer un fichier	RESOLU :comment générer un fichier excel depuis Cshell
convertir base de donnée excel en base de donnée SQL	envoyer une donnée dans excel depuis une textbox
Dectecter un Disque dur USB et executer un fichier	copie intranet de fichier en php
[VBS] Organiser la sortie d'un script dans un tableau excel
Plus de sujets relatifs à : [C#] Créer un fichier Excel

Page générée en 0.101 secondes