Test sur valeurs dans un classeur excel

Version imprimable

29/01/2009, 21h47
driver

Test sur valeurs dans un classeur excel

Bonjour,

je suis un peut débutant sur vb.net et j aimerait récupérer des valeurs depuis un fichier excel composer de plusieurs feuilles puis les lister sur une listbox(lst_recrute)
je recupere le chemain du fichier depuis le textbox txt_fichier_recrute.text
la feuille depuis le combobox cmb_mois
une valeur de test depuis le textbox txt_age.text

mon fichier ce présente ainsi
3 colonnes
nom(a) Age (b) salaire(c)

les valeurs dans tout les colonnes commencent depuis la ligne 10 c'est a dire que la première valeur nom cellule(a10),age cellule(b10),salaire cellule(c10)
le nombre de ligne et variable il peut être 10 comme il peut être 2000
ce que je veux c tester sur toutes les cellules (d'une feuille) age si age correspond a la valeur txt_age.text alors récupérer les deux valeurs nom & salaire dans une listebox

j'espere que j'ai bien explique mon problème
merci d'avance pour vos réponses
29/01/2009, 22h31
wakan

Bonjour,
Pour récupérer des valeurs dans un fichiers Excel il y a deux solutions :
1) Tu crée un processus Excel et tu lit directement dedans ligne par ligne ou valeur par valeur. C'est assez long mais tu peux faire de la mise en page.

2) Tu considère celle que je te conseillerai dans ton cas, c'est de considérer le fichier excel comme une base de donnée et de l'attaquer directement avec ADO.Net. C'est beaucoup plus rapide dans ta chaine de connexion tu dis que c'est un fichier excel et tu lui passe le chemin après tu fait ta requête sur les feuille excel comme si c'était des tables. Tu stockes tes résultats dans un dataset et tu les parcours tout en faisant ton traitement.

J'espère que cela pourra t'aider pour toutes précisons complémentaires n'hésite pas à reposter.

A bientôt
29/01/2009, 22h38
driver

salut wakan et merci pour ta réponse
pourrait tu me donne un exemple de code pour les deux méthodes
je sais que j'en demande trop dsl :mrgreen:

Exemple de code pour la solution 2) :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
string filePath = @"C:\Classeur1.xls";
string connectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + filePath + ";Extended Properties=\"Excel 8.0\";";
OleDbConnection connection = new OleDbConnection(connectionString);
string cmdText = "SELECT * FROM [Feuil1$]";
OleDbCommand command = new OleDbCommand(cmdText, connection);
 
command.Connection.Open();
OleDbDataReader reader = command.ExecuteReader();
 
if (reader.HasRows)
{
    while (reader.Read())
    {
        Console.WriteLine("{0}\t{1}", reader[0].ToString(), reader[1].ToString());
    }
}
 
reader.Close();
command.Connection.Close();

01/02/2009, 23h02
driver

8O est ce que c'est du vb ?
02/02/2009, 15h04
ioud60

'declaration
Public xlApp1 As Excel.Application
Public xlBook1 As Excel.Workbook
Public xlRange1 As Excel.Range
Public xlWKS1 As Excel.Worksheet
'object qui va recupere les valeurs d'excel dans un tableau a double dimention
Private o_ExcelInfo1 As Object

'creation d'excel
xlApp1 = New Excel.Application
xlBook1 = xlApp1.Workbooks.Open(PreviousFile)
xlWKS1 = xlBook1.Sheets(1)
'code
xlRange1 = xlWKS1.UsedRange
ReDim o_ExcelInfo1(0 To xlRange1.Rows.Count, 0 To xlRange1.Columns.Count)
o_ExcelInfo1 = xlRange1.Value
02/02/2009, 17h19
Skalp

Citation:

Envoyé par driver

8O est ce que c'est du vb ?

Non, c'est du C#, mais tu devrais pouvoir facilement le traduire en VB.