Bouton et suppression d'une ligne de listbox [Résolu]

cs_kossuth 17 Messages postés lundi 5 mars 2007Date d'inscription 18 mars 2007 Dernière intervention - 18 mars 2007 à 01:30 - Dernière réponse : cs_kossuth 17 Messages postés lundi 5 mars 2007Date d'inscription 18 mars 2007 Dernière intervention
- 18 mars 2007 à 21:20
Salut à tous

Comment peux-t-on supprimer à partir d'un Commandbutton une ligne de listbox mais par rapport à son contenu plutot qu'à sa position

par exemple dans une listbox on a :
toto
titi
tata

on veux supprimer titi par rapport à "titi" plutot qu'à sa position 1 dans la liste

J'espère avoir était clair

Merci

@ bientot Kossuth
Afficher la suite 

Votre réponse

2 réponses

Meilleure réponse
cs_MPi 3877 Messages postés mardi 19 mars 2002Date d'inscription 23 août 2018 Dernière intervention - 18 mars 2007 à 03:53
3
Merci
Private Sub UserForm_Initialize()  ' ou Form_Load en VB6
    TextBox1 = "titi"
   
    ListBox1.AddItem "tata"
    ListBox1.AddItem "toto"
    ListBox1.AddItem "titi"
    ListBox1.AddItem "tutu"
End Sub

Private Sub CommandButton1_Click()
    Dim I As Integer
   
    For I = 0 To ListBox1.ListCount - 1
        If ListBox1.List(I) = TextBox1.Text Then
            MsgBox TextBox1.Text & " est à la ligne " & I + 1
            ListBox1.RemoveItem I
            Exit For
        End If
    Next
End Sub

MPi

Merci cs_MPi 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 99 internautes ce mois-ci

Commenter la réponse de cs_MPi
cs_kossuth 17 Messages postés lundi 5 mars 2007Date d'inscription 18 mars 2007 Dernière intervention - 18 mars 2007 à 21:20
0
Merci
Merci beaucoup MPi

ça marche nickel

Kossuth
Commenter la réponse de cs_kossuth

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.