Problème de formule VBA Excel
Résolu
joel27/07
Messages postés
94
Date d'inscription
Statut
Membre
Dernière intervention
-
fabien25000 Messages postés 673 Date d'inscription Statut Membre Dernière intervention -
fabien25000 Messages postés 673 Date d'inscription Statut Membre Dernière intervention -
A voir également:
- Problème de formule VBA Excel
- Formule si et excel - Guide
- Formule moyenne excel plusieurs colonnes - Guide
- Formule somme excel colonne - Guide
- Excel mise en forme conditionnelle formule - Guide
- Liste déroulante excel - Guide
1 réponse
Bonjour,
J'ai pas trés bien compris ton problème de changement de couleur de la colonne : le seul changement de couleur que j'ai observé c'est les mots qui contiennent ce qui est écrit dans textbox1 je te les ai repéré en commentaire.
en tout cas, pour le nombre de ligne voici ton code modifié qui devrait te convenir :
Quand on ne dispose que d'un marteau tous les problèmes ressemblent à un clou
J'ai pas trés bien compris ton problème de changement de couleur de la colonne : le seul changement de couleur que j'ai observé c'est les mots qui contiennent ce qui est écrit dans textbox1 je te les ai repéré en commentaire.
en tout cas, pour le nombre de ligne voici ton code modifié qui devrait te convenir :
Private Sub TextBox1_Change() 'www.blog-excel.com/creer-un-champ-de-recherche-vba Dim Derlig, Ligne As Long ' Application.ScreenUpdating = False Derlig = Worksheets("Inventaire").Range("b" & Rows.Count).End(xlUp).Row Worksheets("Inventaire").Range("B4:B" & Derlig).Interior.ColorIndex = 2 'Exemple 1 (feuille) ListBox1.Clear 'Exemple 2 (ListBox) If TextBox1 <> "" Then For Ligne = 4 To Derlig If Cells(Ligne, 2) Like "*" & TextBox1 & "*" Then Cells(Ligne, 2).Interior.ColorIndex = 43 'changement de couleur cellule ListBox1.AddItem Cells(Ligne, 2) 'Exemple 2 (ListBox) End If Next End If End Sub
Quand on ne dispose que d'un marteau tous les problèmes ressemblent à un clou
Je te remercie pour cette rapide réponse c'est vraiment très sympa de ta part.
J'ai installé ta formule à la place de la mienne, ça fonctionne à merveille!!!
Maintenant quand je fais une recherche ça reste dans le cadre de mon tableau.
Avec ma formule (ce que tu dis ne pas avoir très bien compris) quand je faisais une recherche la colonne B devenait blanche jusqu'à la 65536 ème lignes.
Et donc m'effaçait la couleur verte d'arrière plan du tableau.
Je vais me la mettre au chaud cette formule, pour des tableaux à venir!!!
Je te remercie encore pour cette rapide intervention, je te souhaite un excellent week-end.
Sincères salutation
joel27/07