Bouton de recherche vba + listview
Bonjour tout le monde.
Je poste mon problème après avoir effectué plusieurs recherches sur le forum!
Déja je précise que je suis un débutant en vba!
J'explique ce je cherche à faire :
Dans mon fichier j'ai créer un bouton qui a pour fonction d'ouvrir un userform qui affichera une barre de recherche, un bouton valider et un bouton quitter. Ensuite je veux par exemple que quand je tape les lettres "sig" sa m'affiche tout les lignes où le texte apparé dans la colonne A commeçant par "sig"!
Cela s'affichera dans une listview.
Je veux également une fois la liste de la recherche affiché dans la listview pouvoir clicker sur un produit qui est dans cette listview pour que cela me renvoie à la ligne auquel il est sur la feuille.
Mon bouton recherche ne prendra que les éléments se trouvant sur la feuille où il est placé.
A savoir que j'ai repris beaucoup d'élément de fichier déja existant sur le forum, donc c'est surment un peu le foullie dans mon code.
Je vais laisser un morceau du code où je coince pour le monent :
Private Sub UserForm_Initialize()
Dim textbox1 As String
Select Case CStr(donnee(LBound(donnee) + 5))
Case "textbox"
textbox1.Visible = True
textbox1.Value = CStr(donnee(LBound(donnee) + 6))
Me.Caption = CStr(donnee(LBound(donnee) + 4))
End Select
'selecvaleur2.Caption = message
End Sub
En esperant que quelqu'un puisse m'aider.
Merci
Ps : je joint un fichier brouillon avec mon code
edit : Cijoint.fr - Service gratuit de dépôt de fichiers
Bonjour tout le monde.
Je poste mon problème après avoir effectué plusieurs recherches sur le forum!
Déja je précise que je suis un débutant en vba!
J'explique ce je cherche à faire :
Dans mon fichier j'ai créer un bouton qui a pour fonction d'ouvrir un userform qui affichera une barre de recherche, un bouton valider et un bouton quitter. Ensuite je veux par exemple que quand je tape les lettres "sig" sa m'affiche tout les lignes où le texte apparé dans la colonne A commeçant par "sig"!
Cela s'affichera dans une listview.
Je veux également une fois la liste de la recherche affiché dans la listview pouvoir clicker sur un produit qui est dans cette listview pour que cela me renvoie à la ligne auquel il est sur la feuille.
Mon bouton recherche ne prendra que les éléments se trouvant sur la feuille où il est placé.
A savoir que j'ai repris beaucoup d'élément de fichier déja existant sur le forum, donc c'est surment un peu le foullie dans mon code.
Je vais laisser un morceau du code où je coince pour le monent :
Private Sub UserForm_Initialize()
Dim textbox1 As String
Select Case CStr(donnee(LBound(donnee) + 5))
Case "textbox"
textbox1.Visible = True
textbox1.Value = CStr(donnee(LBound(donnee) + 6))
Me.Caption = CStr(donnee(LBound(donnee) + 4))
End Select
'selecvaleur2.Caption = message
End Sub
En esperant que quelqu'un puisse m'aider.
Merci
Ps : je joint un fichier brouillon avec mon code
edit : Cijoint.fr - Service gratuit de dépôt de fichiers
Dernière édition: