Listbox

[DRANAC]

Bonjour le forum,
J'ai encore un soucis avec les listbox.
Y aurait il un bon tuto super complet ?
Voila j'ai une technique avec les Additem qui va tres bien.
J'aimerais maintenant avoir mes heads pour chaque colonne.
J'utilise donc la technique Row, ça marche très bien pour un tableau cimplet mais ca ne va pas pour un ajout de ligne à ligne.
QQ peut m'aider ?
voici le code :

If CGT2.Value <> "" Then
LST3.RowSource = Range(Sheets("MAT").Cells(1, 1), Sheets("MAT").Cells(1, 12)).Address
For i = 2 To 200
If CGT2.Value = Sheets("MAT").Cells(i, 6).Value Then
'LST3.RowSource = Range(Sheets("MAT").Cells(i, 1), Sheets("MAT").Cells(i, 12)).Address
LastInputRow = Cells(i, 1).End(xlDown).Row
End If
Next i

Else
If CGT2.Value = "" Then
Range(Sheets("MAT").Cells(2, 1), Sheets("MAT").Cells(2, 12)).Select
Range(Selection, Selection.End(xlDown)).Select
LST3.RowSource = Range(Selection, Selection.End(xlDown)).Address

Else
MsgBox "Sélection un groupe école ou prof"
End If
End If

Merci

 

[jp14]

Re : Listbox

Bonjour

Dans la macro la technique utilisée pour remplir la listbox est RowSource.

Si on ajoute une ligne il faut relancer la macro pour faire apparaître la nouvelle entrée dans la listbox.

Pour afficher des entêtes il faut remplir la listbox uniquement avec RowSource.
Pour avoir des entêtes avec Additem il faut utiliser une "listview"

JP