1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
| using Microsoft.Office.Interop.Excel;
public Microsoft.Office.Interop.Excel.ApplicationClass oExcelApp;
public Microsoft.Office.Interop.Excel.Workbooks oBooks;
public Microsoft.Office.Interop.Excel.Workbook oBook;
public Microsoft.Office.Interop.Excel.Worksheet oSheet;
public void ExportVersExcel()
{
oExcelApp = null;
oBooks = null;
oBook = null;
oSheet = null;
// Créer l’objet Excel oExcelApp = new Microsoft.Office.Interop.Excel.ApplicationClass();
oExcelApp.Visible = true; // l’afficher ou pas
oBooks = oExcelApp.Workbooks;
//ouvrir le fichier Excel désiré
oBook = oBooks.Open(nomfichier, Missing.Value ,Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value,Missing.Value,Missing.Value);
// on active la feuille oSheet = (Microsoft.Office.Interop.Excel.Worksheet)oExcelApp.ActiveSheet;
// on active la feuille auto oSheet = (Microsoft.Office.Interop.Excel.Worksheet)oExcelApp.Sheets.get_Item("auto");
// lancement d' une macro object ret = oExcelApp.Application.Run("macro1", Missing.Value, Missing.Value, Missing.Value,
Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value,
Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value,
Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value,
Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value,
Missing.Value, Missing.Value, Missing.Value);
///trouver la fin du fichier (bricolage, faut pas qu'il y ai des cases vides)int i =1 ;
while (oSheet.get_Range("A" + i, "A" + i).Text != "")
{
i++;
}
//ecrire dans le fichier oSheet.Cells.Cells[i, 1] = dateCommande;
//fermeture Propre d'excel
oBook.Save();
if (oBook != null) { oBook.Close(true, nomfichier, Missing.Value); }
if (oSheet != null) {System.Runtime.InteropServices.Marshal.ReleaseComObject(oSheet);
oSheet = null; }
if (oBook != null) {System.Runtime.InteropServices.Marshal.ReleaseComObject(oBook) ;
oBook = null; }
if (oBooks != null) {System.Runtime.InteropServices.Marshal.ReleaseComObject(oBooks) ;
oBooks = null; }
if (oExcelApp != null)
{
oExcelApp.Quit();
System.Runtime.InteropServices.Marshal.ReleaseComObject(oExcelApp); oExcelApp = null; |
