Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2016 chercher valeur dans une ListBox

M

marc.gilliand

XLDnaute Occasionnel
Bonjour,
j'ai ce bout de code :
Private Sub TextBox1_Change()

Application.ScreenUpdating = False

' Range("A2:A24").Interior.ColorIndex = 2
ListBox1.Clear

If TextBox1 <> "" Then
For ligne = 2 To 24
If Cells(ligne, 1) Like "*" & TextBox1 & "*" Then
Cells(ligne, 1).Interior.ColorIndex = 43
ListBox1.AddItem Cells(ligne, 1)
End If
Next
End If

End Sub

j'aimerai que dans mon UF, Xl me remonte toutes les valeurs. Lorsque je taperai P, il me remonterait que les types de pièce commencant par P et ainsi de suite.....
 
Dernière modification par un modérateur:
Trier par date Trier par votes
M

marc.gilliand

XLDnaute Occasionnel
Je ne peux pas envoyer de fichier, car il est trop lourd. Et à ce moment du projet je ne peux pas l'alléger. Alors comment faire ?
 
Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc
Bonjour marc.gilliand, soan,

C'est pourtant simple, allégez votre fichier en conservant seulement :

- la base de données avec une centaine de lignes sans données confidentielles

- l'UserForm.

A+
 
Vote positif 0 Vote négatif
M

marc.gilliand

XLDnaute Occasionnel
soan à dit:
.ch est pour la suisse : ça c'est réel ; si bluewin est un vrai serveur suisse et pas un serveur fictif, l'email est réel, donc confidentiel ➯ il ne doit pas être mis sur le forum ! Loi européenne RGPD !​

soan
Cliquez pour agrandir...
voilà le fichier allégé. J'espère que vous allez pouvoir m'aider. L'userform en question est le N° 2. Et votre réponse à mon post de jeudi à 10h26. Merci d'avance
 

Pièces jointes

  • DebtorMonitoring_Nouveau visuel_Base_Travail_Version_Forum.zip
    722.1 KB · Affichages: 15
Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc
Merci mais c'est une usine à gaz et vous ne donnez pas le mode d'emploi.

Quelle feuille contient la base de données et sur quel bouton faut-il cliquer pour ouvrir l'UserForm ?
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.

Discussions similaires

S
  • Résolu(e)
XL 2016 problème de filtre dans listbox
2 3 4
Réponses
51
Affichages
1 K
saidoush
S
O
  • Question
XL 2019 Je veux afficher mes données dans ma Listbox1 avec l'entete de ma Base donnée et fait la recherche sans que cela derange l'entete.
Réponses
6
Affichages
460
ChTi160
M
  • Question
XL 2010 Calcul possible dans la zone de liste pour le débit et le crédit lors d'une recherche basée sur la zone de texte
Réponses
0
Affichages
431
Mody200
M
Y
  • Résolu(e)
XL 2013 Surligner une ligne si curseur sur la ligne et dans une zone définie
Réponses
2
Affichages
128
Yvan1
Y
E
  • Résolu(e)
XL 2019 inserer une valeur textbox dans la dernière cellule vide horizontalement
Réponses
7
Affichages
327
escudo
E
D
  • Question
XL 2010 suppression de lignes dans un fichier EXCEL via une routine en VBA
Réponses
2
Affichages
269
mapomme
  • Résolu(e)
XL 2019 Organiser les données dans listbox
Réponses
2
Affichages
404
Messan
F
  • Question
Microsoft 365 Poursuivre ou pas la macro
Réponses
2
Affichages
197
Francky79
F
J
  • Question
Microsoft 365 Ajouter une colonne
Réponses
0
Affichages
122
Juliopapadopulos
J
  • Question
XL 2016 Aide pour maj auto de la date + selection multiple dans une liste déroulante
Réponses
5
Affichages
239
fanch55
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…