Discussion :

[HENRYC]

Bonjour,

Depuis que nous sommes passés d'Office 2007 à Office 365, je rencontre des soucis pour faire des exportations de données dans Excel.

Je reçois des erreurs de type

Code :

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

1
2
 
HResult

qui sont des erreurs Excel.
Les programmes d'exportation de données sont écrits en C#, et n'avaient jamais crées de problèmes jusqu'à présent.

Avez-vous déjà rencontré un soucis avec Office 365?
Connaissez-vous un lien pour trouver les bonnes références à Office 365 à importer dans mon appli ?

Merci.

[popo]

Quel techno utilises-tu ?

[HENRYC]

Bonjour Popo

C'est assez simple comme fonctionnement, cela consiste à lire un dataGridView et à l'exporter dans un fichier excel

Code :

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

1
2
3
4
5
6
 
 Microsoft.Office.Interop.Excel.Application xlApp = null;
 Microsoft.Office.Interop.Excel.Workbook xlBook = null;
 Microsoft.Office.Interop.Excel.Worksheet xlSheet;
 Object missing = Missing.Value;
SaveFileDialog frm = new SaveFileDialog();

Je récupère le nom du fichier par:

Code :

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

1
2
 
 if (frm.ShowDialog() == DialogResult.OK)

Et je balaie le dataGrid

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
 for (int iCol = 0; iCol < dtg1.ColumnCount; iCol++)
 {
     // Ecriture des entetes
     xlSheet.Cells[1, iCol + 1] = dtg1.Columns[iCol].HeaderText;                          
     // Ecriture des lignes
     for (int iRow = 0; iRow < dtg1.RowCount; iRow++)
     {
             if (dtg1[iCol, iRow].Value != null)
                     xlSheet.Cells[iRow + 2, iCol +1] = dtg1[iCol, iRow].Value.ToString();
     }
}

et à la fin, j'enregistre le fichier par

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
if (xlBook != null)
 {
        xlBook.SaveAs(frm.FileName, missing, missing, missing, missing, missing,
        Microsoft.Office.Interop.Excel.XlSaveAsAccessMode.xlExclusive, missing,
        missing, missing, missing, missing);
         xlBook.Close(true, frm.FileName, null);
 }
 
if (xlApp != null)
      xlApp.Quit();

Dans le pire des cas, le dataGrid fait 1 000 cellules.