Rech/supp ds Multi sheets

[Christian]

Bonjour à tous
Malgré tous les fils sur les recherches multisheets, je n'est pas trouvé mon bonheur.

J'aimerais que lors d'un double click dans un listbox je supprime dans toutes les feuilles(+ de 200)les lignes correspondant à l'item de ma listbox(s'il existe ).
Donc une recherche sur toutes les feuilles
une suppression de la ligne si correspondance
et une suppression de l'item concerné.

merci de votre aide

A+
Christian

 

[Jeannot45]

Bonjour Christian

Pourrais-tu préciser la source de ta ListBox

Jeannot

 

[Christian]

Re

La source de la listbox est une des feuilles 'feuil4' colonne A
et la valeur à chercher est dans la colonne B des autre feuilles.

A+
Christian

 

[Jeannot45]

Re Christian,

Je te joins un fichier qui fais ce que tu cherches
bonne réception

Jeannot [file name=SuppressionMultiFeuilles.zip size=14730]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/SuppressionMultiFeuilles.zip[/file]

 

[Christian]

Re
J'ai un petit souci a adapter la macro dans mon fichier.
Lors que je veux supprimer le mot 'essai' par exemple.
La variable strItemSelectionne me donne bien 'strItemSelectionne=essai'dans listbox_dblclick()
mais dans SupprimerItem()'strItemSelectionne='''
Je ne vois pas ou j'ai fait une erreur

Christian

 

[Jeannot45]

Bonjour Christian,

Je reprends le fil ... 😉

Je viens de relancer la macro en mettant le mot 'essai' dans la feuille Liste tout semble fonctionner.

Peux tu m'envoyer ta version de la macro que je regarde d'un peu plus près B)

Jeannot

 

[Christian]

Bonjour

Malheuresement mon fichier fait 1Mo, et zipper
190Ko.
Y a t-il un autre moyen(que File Attachment) de faire parvenir un fichier suppérieur à 50Ko?

le code que tu ma envoyé est exactement ce que je voulais

Christian

 

[Jeannot45]

Salut,

Fais un extrait de ton fichier, je ne désire voir que la facon dont tu as adapté le macro

Jeannot

 

[Christain]

Re
je viens de remettre la macro dans mon fichier (oublié l'essai fait hier, à la carré ).
Et là oh surprise tout fonctionne impec.
Je ne sais pas quelle connerie j'ai pu faire hier.

Grand merci.

Christian

 

[Jeannot45]

re,

c'est donc une Happy End
Heureux d'avoir pu t'aider

a+

Jeannot