remplir une collection avec les cellules nommées d'un classeurs Excel

Version imprimable

29/03/2022, 17h09
megamario

remplir une collection avec les cellules nommées d'un classeurs Excel

Bonjour,

Y a t'il un moyen de remplir une collection ou dictionnaire, grâce à la lecture d'un fichier Excel en récupérèrent toutes les cellules nommées, avec pour la clef le nom de la cellule trouvé, et en données la valeur de la cellule trouvée.

Autre solution possible, mais cela m'obligerais de créer avant une collection avec la totalité des noms de cellule que je souhaite, puis rechercher le nom de ces cellules nommées dans le classeur et remplir le dictionnaire avec la clef(ce nom) et la lecture de cette cellule.

C'est un classeur Excel assez lourd avec beaucoup de données, donc peut être long, mais le but est de remplir une BDD (SqlLite) avec ces données (nommées). Puis le reste du temps piocher dans cette BDD. (Le dictionnaire n'est peut être pas utile du coup). Puis effectuer une lecture de ce classeur Excel lors d'une mise à jour.
J'ai énormément de calcule à faire, utilisant ces données, donc je voudrais ma facilité la tache en cas de modification des données "fixes" de ce fichier Excel.
Le fichier Excel provenant du client, il pourrait du coups aussi mettre à jours ces données s'il fait des modifications future.

Je précise que chaque cellules nommées est unique, une seul cellule à chaque fois, il n'y a pas de groupe. Actuellement c'est bien comme cela, mais au cas où, ignorer les champs s'il y en a plusieurs.

Voila, je vous remercie. Je vais continuer à chercher de mon coté dès demains. Bonne soirée.
30/03/2022, 15h38
popo

Il existe plusieurs solutions.

La plus simple est l'interopérabilité Excel (appel d'Excel via COM) mais cela nécessite d'avoir un Excel installé sur la machine.

Sans Excel, il existe Open la librairie OpenXml (complexe)
Ou encore ClosedXml (basé sur OpenXml mais la complexité est masquée)

Bonjour,

J'ai réussi ce matin en trouvant une aide sur le Net que j'ai un peu adapté.

Code:

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
 
        public void UpdateWithExcelFile()
        {
            PathFile = Directory.GetCurrentDirectory() + "\\" + FileName;
            excelApp = new Microsoft.Office.Interop.Excel.Application();
            excelApp.Visible = false;
            myWorkbook = excelApp.Workbooks.Open(PathFile);
            Names wbNames = myWorkbook.Names;
            CellNoms = new Dictionary<string, string>();
            foreach (Name item in wbNames)
            {
                string a = item.Value.ToString();
                string s;
                if (item.Name.Contains("!"))
                {
                    s = "";
                }
                if (a != "=#NAME?" && !a.Contains("#REF"))
                {
                    char ab = Convert.ToChar(39);
                    char[] tr = { ' ' };
                    string[] cut = a.Split('!');
                    if (cut.Length > 1)
                    {
                        string NameSheet = cut[0];
                        NameSheet = NameSheet.Replace('=', ' ');
                        NameSheet = NameSheet.Replace(ab, ' ').Trim(tr);
                        if (WorkSheetExist(NameSheet))
                        {
                            myWorkSheet = excelApp.Worksheets[NameSheet];
 
                            if (myWorkSheet.Range[item.Name].Value2 != null)
                            {
                                s = myWorkSheet.Range[item.Name].Value2.ToString();
                            }
                            else
                            {
                                s = "";
                            }
                            if (item.Name.Contains("!") | item.Name.Contains("'"))
                            {
                                s = "";
                            }
                            else
                            {
                                CellNoms.Add(item.Name, s);
                            }
                        }
                    }
                }
            }
            UpdateBaseSql();
        }

J'ai fait des filtres un peu barbare, mais cela fonctionne.