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

M
  • Question
XL 2010 Aide à la suppression d'un produit en double dans un magasin spécifique avec conditions
Réponses
9
Affichages
736
Mody200
M
A
  • Question
insertion d'une ligne automatique dans un tableau excel.
Réponses
1
Affichages
285
sylvanu
M
  • Question
XL 2010 Demande de quantité d'un produit dans un magasin spécifique selon la date la plus ancienne
2
Réponses
21
Affichages
1 K
Mody200
M
M
  • Question
XL 2010 Remise et ajout de quantité
Réponses
10
Affichages
682
Dranreb
S
  • Résolu(e)
XL 2016 problème de filtre dans listbox
2 3 4
Réponses
51
Affichages
2 K
saidoush
S
U
  • Question
Autres incorporer une macro dans une autre macro
Réponses
5
Affichages
330
Phil69970
  • Question
XL 2021 Exportation feuille msgbox yes no avec module Thisworkbook
2
Réponses
21
Affichages
1 K
Nicolas JACQUIN
N
  • Résolu(e)
XL 2021 comment faire recherche dans une colonne et ligne
Réponses
5
Affichages
379
job75
N
  • Résolu(e)
Microsoft 365 Récupération données ListBox dans TextBox
2 3
Réponses
35
Affichages
570
NONO14
N
  • Résolu(e)
Microsoft 365 VBA - BeforeDoubleClick, 1ère cellule vide à partir de cellule active pour insertion de ligne
Réponses
4
Affichages
158
AlCapone
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…