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

Macro - Extraire d'une feuille dans sa totalité

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Nougatine95

XLDnaute Occasionnel
Bonsoir,
Je reviens vers vous...

Sur fichier joint, je cherche une chaine de texte en colonne C par TextBox avec le code suivant (code communiqué par le Forum🙂):

Code:
Private Sub TextBox1_Change()
If Me.TextBox1 <> "" Then
    Range("C4").AutoFilter Field:=3, Criteria1:="=*" & Me.TextBox1 & "*"
Else
    ActiveSheet.ShowAllData
End If
End Sub

Que dois-je modifier pour extraire chaine parmi toute la page?, je suppose qu'il faut modifier uniquement cette ligne:

Code:
Range("A4:E48").AutoFilter Field:=
= ?????

Merci pour votre aide.
 

Pièces jointes

Re : Macro - Extraire d'une feuille dans sa totalité

bonsoir nougatine,

je ne comprends pas ta question, ton code permet de filtrer ton feuillet sur la séquence inscrite dans le textbox et fonctionne bien

qu'entends-tu par extraire?

sinon j'ai ajouté un petit bouton défiltrer, ça ne mange pas de pain (comme on dit chez moi), voir fichier joint

Dans l'attente de te lire

A+
 

Pièces jointes

Dernière édition:
Re : Macro - Extraire d'une feuille dans sa totalité

re...

je crois avoir compris : tu veux garder en visu uniquement les lignes contenant ta séquence quelle que soit la colonne dans laquelle elle se trouve

Si c'est bien ça, voir fichier joint, ce n'est pas du tout la même méthode

Code:
Private Sub TextBox1_Change()

Dim cherchecell As Range
Rows.EntireRow.Hidden = False
For i = 5 To Range("A65536").End(xlUp).Row
Set cherchecell = Rows(i).Find(TextBox1)
If cherchecell Is Nothing Then Rows(i).EntireRow.Hidden = True
Next
End Sub
A+
 

Pièces jointes

Re : Macro - Extraire d'une feuille dans sa totalité

Bonsoir Ledzepfred,
Bonsoir le Forum,

Oui c'était cela en effet, le 1er code s'intéressait à la colonne C uniquement.
Je souhaitais en effet que le filtre glane toutes les colonnes, et je pensais qu'une toute petite modif suffisait 🙁

Ton code donne exactement ce que je recherchais.
Merci infiniment cher Ledzepfred.

Et vive les pros de ce Forum 😉
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
18
Affichages
1 K
Réponses
8
Affichages
653
Réponses
4
Affichages
742
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…