Etevaldo Santos
XLDnaute Nouveau
Bonjour, depuis le Brésil;
J'espère que vous allez tous bien et que vous êtes en bonne santé.
Encore une fois j’ai m’adresse à vous pour supplier l’aide sur un projet VBA que me bloque.
J'ai un tableau avec les enregistrements des personnes/clientes avec tous leurs donnes (nom, code postale, adresse, téléphone, e-mail, ...).
Ce tableau il a donc plusieurs lignes pour classer ces donnes, où toutes les colonnes il a des Filtres.
j'ai fait un code VBA pour faire un tri plus dynamique:
Sur la feuille de mon tableau il a pour chaque colonne un TextBox associé, où l'utilisateur peux saisir son texte de recherche.
Le tableau alors se met à jour au fur et mesure que le texte est saisi dans le TextBox, en prenant compte du texte contenant sur les cellules selon le texte saisie.
Ainsi l'utilisateur peut voir, en temps réelle, toutes les cellules qui contiens (n’importe où dans la cellule) le texte au moment de leur saisie sur le TextBox.
Et voilà mon problème, puis que cela marche très bien sur tour les colonnes avec des donnes TEXTE, mais ça ne marche point sur les colonnes au format NUMERIQUE (quel que soit le format personnalisé - par exemple: 00000-000 pour le code postale), le retour sur les colonnes numériques est donc NULE (aucun linge est affiché) .
J'ai trouvé une solution palliative pour les cellules numériques, où le filtre est fait seulement SI la saisie du numéro soit EXACT.
Alors, dans ce cas, le retour des donnes est bien réduit, et alors cela ne me convient pas.
J'aimerais une solution, en VBA, que puisse burler cette limitation des cellules Numériques et de faire exactement la même chose que les cellules Texte, c'est ta dire, une mise à jour dynamique lors de la saisie de chaque numéro sur le TextBox
Un autre défi est précisément de faire fonctionner aussi le filtre dans les cellules formatées avec des dates, où leur da la saisi d'une valeur dans TextBox une mise á jour duynamique soit aussi faite.
Je disponibilise , en attaché, un fichier exemple avec les TextBox et les Macros mentionné ci-dessus.
Je vous remercie, encore une fois pour votre très grande collaboration sur ce sujet.
À très bientôt et soignez-vous
J'espère que vous allez tous bien et que vous êtes en bonne santé.
Encore une fois j’ai m’adresse à vous pour supplier l’aide sur un projet VBA que me bloque.
J'ai un tableau avec les enregistrements des personnes/clientes avec tous leurs donnes (nom, code postale, adresse, téléphone, e-mail, ...).
Ce tableau il a donc plusieurs lignes pour classer ces donnes, où toutes les colonnes il a des Filtres.
j'ai fait un code VBA pour faire un tri plus dynamique:
Sur la feuille de mon tableau il a pour chaque colonne un TextBox associé, où l'utilisateur peux saisir son texte de recherche.
Le tableau alors se met à jour au fur et mesure que le texte est saisi dans le TextBox, en prenant compte du texte contenant sur les cellules selon le texte saisie.
VB:
'Filtro 3 - Coluna E
Private Sub TextBox3_Change()
70 Selection.AutoFilter Field:=3, Criteria1:="=*" & TextBox3.Text & "*", Operator:=xlAnd
End Sub
Private Sub TextBox3_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
80 TextBox3.Text = ""
90 Selection.AutoFilter Field:=3
End Sub
Ainsi l'utilisateur peut voir, en temps réelle, toutes les cellules qui contiens (n’importe où dans la cellule) le texte au moment de leur saisie sur le TextBox.
Et voilà mon problème, puis que cela marche très bien sur tour les colonnes avec des donnes TEXTE, mais ça ne marche point sur les colonnes au format NUMERIQUE (quel que soit le format personnalisé - par exemple: 00000-000 pour le code postale), le retour sur les colonnes numériques est donc NULE (aucun linge est affiché) .
J'ai trouvé une solution palliative pour les cellules numériques, où le filtre est fait seulement SI la saisie du numéro soit EXACT.
Alors, dans ce cas, le retour des donnes est bien réduit, et alors cela ne me convient pas.
J'aimerais une solution, en VBA, que puisse burler cette limitation des cellules Numériques et de faire exactement la même chose que les cellules Texte, c'est ta dire, une mise à jour dynamique lors de la saisie de chaque numéro sur le TextBox
Un autre défi est précisément de faire fonctionner aussi le filtre dans les cellules formatées avec des dates, où leur da la saisi d'une valeur dans TextBox une mise á jour duynamique soit aussi faite.
Je disponibilise , en attaché, un fichier exemple avec les TextBox et les Macros mentionné ci-dessus.
Je vous remercie, encore une fois pour votre très grande collaboration sur ce sujet.
À très bientôt et soignez-vous