Zone de liste associée à un bouton de commande

lisco Messages postés 54 Date d'inscription lundi 14 juillet 2008 Statut Membre Dernière intervention 28 septembre 2008 - 1 août 2008 à 12:55
mortalino Messages postés 6786 Date d'inscription vendredi 16 décembre 2005 Statut Membre Dernière intervention 21 décembre 2011 - 1 août 2008 à 13:08
Bonjour , j'ai des titres de livres dans ma colonne"A""et leurs dates de publication dans ma colonne "B"  dans un fichier excel, et je voudrais afficher par lot de 5 dans une zone de liste par simple clique sur un bouton de commande?Quelqu'un a une idée comment fusionner les deux evenemenets à savoir click boutons qui retourne le resultat dans la zone de liste??
Help please.
merci d'avance

1 réponse

mortalino Messages postés 6786 Date d'inscription vendredi 16 décembre 2005 Statut Membre Dernière intervention 21 décembre 2011 18
1 août 2008 à 13:08
Salut,

tu peux gérer avec une vairable static dans l'évèn ement CommandButton_Click :

Sub CommandButton1_Click()
    Dim i as integer
    Static iCounter as integer

TaListBox.Clear
For i = 2 + iCounter To 6 + iCounter
    TaListBox.AddItem Cells(i, 1).Value & vbTab & Cells(i, 2).Value
Next i
iCounter  =  IIf(iCounter = 0, iCounter + 7, iCounter + 5)
End Sub

@++

le mystérieux chevalier,"Provençal, le gaulois"
Forum Office & VBA
0
Rejoignez-nous