Discussion :

[baloote]

Bonjour à tous,

Je suis face à un petit souci : j'aimerai depuis une application en C# écrire des données dans une cellule ciblée d'un document Excel existant.

voici mon code :

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
        private void xlsDriving()
        {
            object Missing = System.Reflection.Missing.Value;
            string fileName = @"c:\\test.xls";
 
            System.Threading.Thread.CurrentThread.CurrentCulture = System.Globalization.CultureInfo.CreateSpecificCulture("en-US");
 
            Excel._Application xlApp;
            Excel._Workbook xlClasseur;
            Excel._Worksheet xlFeuill1;
 
            xlApp = new Excel.Application();
            xlApp.Visible = false;
 
            xlClasseur = xlApp.Workbooks.Open(fileName, 0, true, 5, "", "", true, Excel.XlPlatform.xlWindows, "\t", false, false, true, 0, true, true);
            Excel.Sheets xlFeuilles = xlClasseur.Sheets;
            xlFeuill1 = (Excel._Worksheet)xlFeuilles["Sheet1"];
 
            if (textBox3.Text != "no data")
            {
                string Value = textBox3.Text;
                Excel.Range r = xlFeuill1.get_Range("B9", Missing);
                object[,] cell = (object[,])r.Cells.get_Value(Microsoft.Office.Interop.Excel.XlRangeValueDataType.xlRangeValueDefault);
                cell[1, 1] = Value;
            }
 
 
            xlClasseur.Save(); // Enregistre les modifs des cellules
            xlClasseur.Close(false, Missing, Missing); // ferme le XLS
            xlApp.Quit(); // On met fin au pilotage
 
        }

Lors de l'execution j'obtiens cette erreur et je ne trouve pas de solution :
Erreur à la ligne : cell[1,1] = Value; :

Object reference not set to an instance of an object.

Merci d'avance pour votre aide.

Sylvain.

[Thomas Lebrun]

Essaye:

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
 
private void xlsDriving()
        {
            object Missing = System.Reflection.Missing.Value;
            string fileName = @"c:\\test.xls";
 
            System.Threading.Thread.CurrentThread.CurrentCulture = System.Globalization.CultureInfo.CreateSpecificCulture("en-US");
 
            Excel._Application xlApp;
            Excel._Workbook xlClasseur;
            Excel._Worksheet xlFeuill1;
 
            xlApp = new Excel.Application();
            xlApp.Visible = false;
 
            xlClasseur = xlApp.Workbooks.Open(fileName, 0, true, 5, "", "", true, Excel.XlPlatform.xlWindows, "\t", false, false, true, 0, true, true);
            Excel.Sheets xlFeuilles = xlClasseur.Sheets;
            xlFeuill1 = (Excel._Worksheet)xlFeuilles["Sheet1"];
 
            if (textBox3.Text != "no data")
            {
                string Value = textBox3.Text;
                Excel.Range r = xlFeuill1.get_Range("B9", Missing);
                r.Value = Value;
            }
 
 
            xlClasseur.Save(); // Enregistre les modifs des cellules
            xlClasseur.Close(false, Missing, Missing); // ferme le XLS
            xlApp.Quit(); // On met fin au pilotage
 
        }

[baloote]

J'ai essayé avec ta modification,
Donc en fait r.Value n'existait pas donc j'ai utilisé r.Value2 (qui doit être la même chose), je n'ai plus d'erreur à l'execution mais lorsque j'ouvre mon fichier excel à la fin du traitement, je ne trouve pas la valeur sur la cellule B9...

[ced600]

Heuresement que j'ai regardé sur le net j'allais dire une grosse connerie

La solution est là normalement :
http://msdn2.microsoft.com/en-us/library/77bx579s.aspx

Deux autres liens qui pourront t'être utile :
http://msdn2.microsoft.com/fr-fr/office/bb964249.aspx
http://msdn.microsoft.com/newsgroups...&lang=en&cr=US

[baloote]

Merci pour ces liens mais la encore je me trouve face à un nouveau probleme :

J'utilise comme sur le premier lien dans ma boucle ce code-ci :

Code :

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

1
2
3
4
5
6
7
            if (textBox3.Text != "no data")
            {
                string Value = textBox3.Text;
                Microsoft.Office.Tools.Excel.NamedRange nr = this.Controls.AddNamedRange(this.Range["B9", Missing], "NamedRange1");
 
                nr.Value2 = Value;
            }

mais la surviens un autre probleme : je n'ai pas la reference

Microsoft.Office.Tools.Excel

dans mon .COM ...

Que faire ?

[ced600]

1) la rajouter dans l'assembly.
2) sors moi la déclaration de la variable de la boucle !!!!
Pas la peine de redéclarer à chaque fois! Tu réaffectes juste la valeur.
Pareil pour le string.

[Verb@l]

Salut,

dans ton projet tu cliques "Références" (bouton droit) -> "Ajouter une référence" -> tu choisis l'onglet "COM" et tu ajoutes la référence "Microsoft Excel xx Object Librairy".
Le xx correspond à la version.

Je pense que cela devrait mieux marcher.