Discussion :

[mac4209]

Bonjour,

J'ai un fichier excel dans lequel j'ai insérer un tableau que j'ai appeler "montableau". Dans une macro, je souhaite faire un Vlookup où je viens chercher les infos dans mon tableau. Comment déclarer le tableau et faire en sorte qu'il corresponde à mon tableau, c'est-à-dire que si j'ajoute des lignes dans excel, ma macro sache le prendre en compte.

Merci

[BENNASR]

Bonjour
sélectionner le tableau / onglet insertion / tableau
puis formule et définir un nom à ton tableau
chaque ligne ajouté en dessous automatiquement sera inclus dans ton tableau

[mac4209]

j'ai fait mon tableau sans problème dans excel comme vous l'expliquer, mon soucis est de le gérer dans VBA

[BENNASR]

je sais pas si c'est ce que tu cherche à défaut faux bien expliquer ta demande
NB : chui débutant en VBA et mes connaissance sont très limitées

Code :

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

1
2
3
4
5
6
7
8
9
10
Sub calcul_solde()
Dim Tablo
Dim i As Long
Tablo = Sheets("BLABLA").Range("A10", "I" & Sheets("BLABLA").Range("I" & Rows.Count).End(xlUp).Row) ' ici  mon tableau allant de A10 à la colonne I
For i = LBound(Tablo, 1) To UBound(Tablo, 1)
    If Tablo(i, 1) = "B T" Then  ' si la colonne A = BT
        resultat = resultat + Tablo(i, 9) ' somme les valeur de la colonne 9
    End If
Next i
Sheets("BLABLA").Range("E4") = resultat ' ou s'inscrit le résultat trouvé

[mac4209]

Je ne crois pas que cela corresponde a ma demande... Je vais tenter de reexpliquer mon problème.
Dans une feuille excel "feuil1", j'ai une plage de donnée "A1:B5" où j'ai en A un nom et en B une note de 0 à 20. J'ai pris mes données et inséré un tableau nommé "note_eleves". Lorsque j'ajoute un nouveau nom et une note à la suite de mon tableau, mes données s'ajoute au tableau... jusque là rien de compliqué.
Dans VBA, je souhaite faire un VlookUp qui me renvoi la note en fonction du nom que j'ai saisi en C4.
J'ai donc :

Code :

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

resultat = Application.VLookup(Range("C4").Value, "A1:B5", 2, False)

Je souhaite remplacer A1:B5 par "note_eleves" pour que la macro prenne en compte toutes les lignes de mon tableau si j'ajoute des noms. Ma question est donc comment déclarer le tableau pour que VBA le reconnaisse ?

[eriiic]

Bonjour,

pourquoi ne pas continuer ici http://www.developpez.net/forums/d16...-d-recherchev/ ?
eric