XL 2016 VBA - Recherche dans le code des fichiers Excel d'un répertoire (et sous-répertoires)

[Dudu2]

Bonjour,

Quelqu'un a-t-il déjà développé un outil de recherche textuelle dans les Modules et UserForms des fichiers Excel d'un répertoire ?

Merci

 

[kiki29]

Salut, un début de réponse via une recherche.

 

[Dudu2]

Bonjour @kiki29,

Merci pour ce lien. J'avais rapidement cherché sans trouver une solution complète.
Je crois que je vais devoir m'y coller en utilisant ces bouts de codes de recherche dans le Projet de chacun des fichiers candidats.

 

[kiki29]

Re, sans savoir si cela t'aidera , à voir

 

[VIARD]

Bonjour @Dudu2 @kiki29 et à tous

Il y a un moment j'ai fait ce programme.
Je ne sais pas si répond vraiment à ton souci
regarde toujours.

Amicalement
Jean-Paul

 

[Dudu2]

Bonjour JP,

Merci pour ce code, je vais voir ce que je peux en retirer.
Pour info il me manque une référence:

JP

 

[VIARD]

ReBonjour @Dudu2

Voilà j'avais trouvé ça sur excel-pratique
Jean-Paul

 

[Dudu2]

OK merci.
Ce qu'il me faudrait c'est un moyen d'accéder aux components du Projet VBA sans avoir à ouvrir les fichiers.
Je n'ai rien trouvé d'exploitable sur Internet

 

[Dudu2]

Bon, voilà un fichier qui peut répondre à la question:
Mais dans quel foutu programme ai-je utilisé ces notions que j'aimerais bien ré-utiliser ?
Plus tard j’inclurai les .bas et les .txt éventuellement.

Edit: c'est mieux si les fichiers recherchés sont sur SSD !

 

[Dudu2]

Finalement, j'ai inclus les fichiers .bas et .txt dans le recherche sur option.
Je vais peut-être passer ça en ressource. Ça devrait intéresser d'autres personnes.

Edit: Fichier supprimé, voir ci-dessous.

 

[Dudu2]

Pour les nombreux intéressés (3 !

), en avant-première de la publication de la ressource à venir, le dernier fichier en date qui permet d'entrer le filtre sur nom de fichier et les termes recherchés en format 'Like'.
Un Plus indiscutable ! 😉

 

[patricktoulon]

re
bonjour @Dudu2

Ce qu'il me faudrait c'est un moyen d'accéder aux components du Projet VBA sans avoir à ouvrir les fichiers.

a tu solutionné cette question ?

 

[Dudu2]

Bonjour @patricktoulon,

a tu solutionné cette question ?

Non, j'ouvre les fichiers sous Application.ScreenUpdating = False et aussi Application.EnableEvents = False et Application.Calculation = xlCalculationManual pour éviter les affichages, les actions des Workbook_Open() éventuels et des fonctions personnalisées éventuelles.

Perso tout est sur SSD donc ça va relativement vite. Mais avec un HD ça doit être bcp plus lent.

Si tu as une solution, je suis preneur.