IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Windows Forms Discussion :

Lecture de ligne fichier excel


Sujet :

Windows Forms

  1. #1
    Débutant
    Inscrit en
    Mars 2006
    Messages
    492
    Détails du profil
    Informations forums :
    Inscription : Mars 2006
    Messages : 492
    Points : 94
    Points
    94
    Par défaut Lecture de ligne fichier excel
    Bonjour,

    Pour la lecture d'une case dans un fichier excel, j'ai fais comme suite :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    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
    Microsoft.Office.Interop.Excel.Application excelApplication = null;
    Microsoft.Office.Interop.Excel.Workbook workbook = null;
    Microsoft.Office.Interop.Excel.Worksheet worksheet = null;
    
    excelApplication = new Microsoft.Office.Interop.Excel.Application();
    excelApplication.Visible = false;
    
    workbook = excelApplication.Workbooks.Open(@"D:\Après\mailing_RA_20090219.xls", 0, false, 5, "", "", false, Microsoft.Office.Interop.Excel.XlPlatform.xlWindows, "", true, false, 0, true, false, false);
    worksheet = (Microsoft.Office.Interop.Excel.Worksheet)workbook.Worksheets[2];
    
    
    excelApplication.Quit();
    excelApplication = null;
    
    string cellValue = "";
    object cellObject = null;
    Microsoft.Office.Interop.Excel.Range range = null;
    
    
    range = (Microsoft.Office.Interop.Excel.Range)worksheet.Cells[3,2];
    
    cellObject = range.get_Value(null);
    cellValue = (cellObject == null ? "" : cellObject.ToString().Trim());
    
    
    Console.WriteLine(cellValue);
    J'ai une exception sur la ligne : range = (Microsoft.Office.Interop.Excel.Range)worksheet.Cells[3,2]; lexception : Exception de HRESULT : 0x800401A8, sachant que cette ligne existe, merci beaucoup

  2. #2
    Membre régulier
    Profil pro
    Inscrit en
    Février 2007
    Messages
    125
    Détails du profil
    Informations personnelles :
    Localisation : France, Paris (Île de France)

    Informations forums :
    Inscription : Février 2007
    Messages : 125
    Points : 109
    Points
    109
    Par défaut
    Salut,

    J'ai très peu de temps à, mais en voyant ton post, juste un petit point,
    je me souviens que je me lis mes fichiers Excel avec quelque chose qui ressemble fortement à du ADO, je me souviens plus exactement comment, mais je suis sûr d'avoir trouvé les explications sur Developpez.qqch ...

    Si t'as pas trouvé quand je serais devant mon Visual, je reposterais...
    ElTchoupi

  3. #3
    Membre régulier
    Profil pro
    Inscrit en
    Février 2007
    Messages
    125
    Détails du profil
    Informations personnelles :
    Localisation : France, Paris (Île de France)

    Informations forums :
    Inscription : Février 2007
    Messages : 125
    Points : 109
    Points
    109
    Par défaut
    Hello,

    Voilà, j'ai remis la main sur mon code.
    Désolé, j'ai pas le temps de l'expliquer, mais ça devrait se lire sans trop de pb.
    Attention par contre, je me souviens que dans une cas (rare) la méthode plante, mais impossible de me souvenir pourquoi (ou quand).
    Mais le "cas autoroute" marche:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    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
    46
    47
    48
    49
    50
    51
    52
    53
    54
    55
    56
    57
    58
    59
    60
    61
    62
    63
    64
    65
    66
    67
    68
    69
    70
    71
    72
    73
    74
    75
    76
     
    public static List<DataTable> ParseExcelFile(string aExcelFileFullPath)
        {
          log.Info("Entering 'ParseExcelFile'");
     
          OleDbConnection lOdlDbExcelConnection = null;
          List<DataTable> lExcelWorkSheetsDataTableColl = new List<DataTable>();
     
          try
          {
            // Connection String
            String lOdlDbExcelConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" +
                                                 "Data Source=" + aExcelFileFullPath +
                                                 ";Extended Properties=Excel 8.0;";
            // Create connection object by using the preceding connection string.
            lOdlDbExcelConnection = new OleDbConnection(lOdlDbExcelConnectionString);
            OleDbCommand lOleDbExcelCommand = new OleDbCommand();
            lOleDbExcelCommand.Connection = lOdlDbExcelConnection;
     
            OleDbDataAdapter lOleDbExcelDataAdapter = new OleDbDataAdapter(lOleDbExcelCommand);
     
            lOdlDbExcelConnection.Open();
     
            DataTable lExcelSchemaDataTable =
                lOdlDbExcelConnection.GetOleDbSchemaTable(System.Data.OleDb.OleDbSchemaGuid.Tables,
                                                          new object[] { null, null, null, "TABLE" });
     
            if (null != lExcelSchemaDataTable)
            {
              log.Info("Schéma du fichier '" + aExcelFileFullPath + "' récupéré: " + lExcelSchemaDataTable.Rows.Count + " Worksheets detectés");
     
              DataTable lNewExcelDataTable = null;
              String lExcelWorkSheetName = null;
     
              for (int lExcelWorkSheetIndex = 0;
                   lExcelWorkSheetIndex < lExcelSchemaDataTable.Rows.Count;
                   lExcelWorkSheetIndex++)
              {
                lExcelWorkSheetName = lExcelSchemaDataTable.Rows[lExcelWorkSheetIndex]["TABLE_NAME"].ToString();
     
                lNewExcelDataTable = new DataTable(lExcelWorkSheetName);
     
                lOleDbExcelCommand.CommandText = @"SELECT * FROM " + "[" + lExcelWorkSheetName + "]";
     
                lOleDbExcelDataAdapter.Fill(lNewExcelDataTable);
                log.Info("Parse du WorkSheet '" + lExcelWorkSheetName + "' terminé");
     
                lExcelWorkSheetsDataTableColl.Add(lNewExcelDataTable);
     
                log.Info("Import du WorkSheet '" + lExcelWorkSheetName + "' dans la DataTable Collection terminé");
              }
            }
            else
            {
              log.Debug("NULL 'lExcelSchemaDataTable': impossible to get informations about the Excel file");
            }
     
            lOdlDbExcelConnection.Close();
          }
          catch (Exception ex)
          {
            log.Error("Parse du fichier Excel '" + aExcelFileFullPath + "'", ex);
            return null;
          }
          finally
          {
            // Clean up.
            if (lOdlDbExcelConnection != null)
            {
              lOdlDbExcelConnection.Close();
              lOdlDbExcelConnection.Dispose();
            }
          }
     
          return lExcelWorkSheetsDataTableColl;
        }
    Biensûr, tout commentaire constructif est le bienvenu !
    ElTchoupi

Discussions similaires

  1. [VB.NET] Accélerer la lecture d'un fichier excel
    Par Franck2mars dans le forum Windows Forms
    Réponses: 4
    Dernier message: 16/11/2007, 11h35
  2. Lecture d'un fichier excel avec C++
    Par ziss dans le forum C++
    Réponses: 1
    Dernier message: 17/10/2006, 18h31
  3. Lecture d'un fichier Excel uniquement sur un seul poste
    Par loutsky dans le forum Macros et VBA Excel
    Réponses: 5
    Dernier message: 24/05/2006, 08h09
  4. [VB6] Problème de lecture d'un fichier excel
    Par Requin15 dans le forum VB 6 et antérieur
    Réponses: 5
    Dernier message: 23/03/2006, 17h10
  5. macros word et lecture dans un fichier excel
    Par antrax2013 dans le forum Windows
    Réponses: 2
    Dernier message: 01/10/2005, 19h05

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo