Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.
Icône de la ressource

Rechercher dans le code VBA de tous les classeurs d'un répertoire + Visualiser le code trouvé V2.4

Inscrivez vous pour télécharger ce fichier
  • Initiateur de la discussion Initiateur de la discussion crocrocro
  • Date de début Date de début
Vue principale Historique Discussion

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 !

S'inscrire
C

crocrocro

XLDnaute Impliqué
crocrocro a soumis une nouvelle ressource:

Rechercher dans le code VBA de tous les classeurs d'un répertoire + Visualiser le code trouvé - Outil de recherche dans le code VBA de tous les classeurs d'un répertoire - Aperçu du Code Trouvé


En savoir plus sur cette ressource...
 
Pour les lignes ou apparaissent un mot as tu pensé à ajouter les lignes précédentes ou suivantes s'il y a des caractères de suite (le souligné)
 
Hello,
Le Sleep (pas Kangourou) dans le module de la barre de progression ne fonctionne pas pour une version 64 bits d'Excel, il faut mettre :
VB: 
 Private Declare PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As LongPtr)
Ce code marche en 64 bits et 32 bits pour un VBA 7
Ami calmant, J.P
 
JP très drôle
 
Bonjour JP, et merci pour ton retour
effectivement, il faut modifier le code du USerForm
M
VB: 
Option Explicit

#If VBA7 Then
    Private Declare PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
#Else
    Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
#End If

scraper à dit:
Pour les lignes ou apparaissent un mot as tu pensé à ajouter les lignes précédentes ou suivantes s'il y a des caractères de suite (le souligné)
Cliquez pour agrandir...
Bonjour scraper,
je suppose que tu veux parler de l'aperçu du contenu avec l'option "Uniquement les lignes trouvées".
Non, mon code ne le gère pas, au moins pour le moment. 🙁
Il faut cocher l'option "Le Code de la Procédure".
 
Une nouvelle version V2 est disponible. Son contenu :
  • Ajout pour la Recherche d'un filtre sur le Type de Composant :
    • Classeur ou Feuille
    • Module Standard
    • Module de Classe
  • Modifications mineures
 
Une nouvelle version V2.1 est disponible. Son contenu :
  • Ajout de l'Option de Recherche sur la Description des Procédures
  • Correction d'une erreur sur la recherche avec l'option ET
  • Modifications de présentation
A l'attention des personnes qui téléchargeraient mon fichier :
J'aimerais avoir un retour sur les temps d'exécution du traitement de Recherche dans les conditions suivantes :
- Rechercher dans tout le code
- le texte (unique) recherché doit être inexistant (par exemple jeudi32mars)
- le nombre de fichiers traités doit être assez important (au minimum 20, 100 c'est bien)
- ne pas effectuer de traitement en parallèle
Avant de lancer l'exécution, mettre la Constante MODE_DEBUG du module Module_ChercherVBA à True
-> Les informations d'exécution sont déversées dans la fenêtre d'exécution (Debug.Print)

======================================================================
--- Recherche dans Tout le Code ---

Durée du traitement : 25 secondes
Nombre de Fichiers : 9
Nombre de Lignes de Code : 4123
Nombre de Procédures : 167
Nombre de boucles : 36
--------------------
Informations Système
--------------------
Processeur : Intel(R) Core(TM) i3-5005U CPU @ 2.00GHz
Mémoire RAM : 4 Go

Merci de les transmettre en réponse à cette discussion
 
Bonsoir. J’ai téléchargé, ce n'est peut être pas la dernière version en ligne. Notamment pour x64 dans le formulaire et quelques bugs dus à la protection des feuilles qui après un Unprotect dans les proc concernées fonctionnent.
Sympa, à suivre
 
terme recherché "function"
======================================================================
--- Recherche dans Tout le Code ---
Durée du traitement : 407 secondes
Nombre de Fichiers : 214
Nombre de Lignes de Code : 594847
Nombre de Procédures : 15799
Nombre de boucles : 3897
--------------------
Informations Système
--------------------
Processeur : Intel(R) Core(TM) i5-7400 CPU @ 3.00GHz
Mémoire RAM : 8 Go
======================================================================
1 fichier en erreur code 50289
Impossible d'effectuer cette opération tant que le projet est protégé.
======================================================================
Par contre dans l'onglet "Liste Procédures", les liens ne sont pas valides et les noms de fichiers mentionés ne se retrouvent pas dans l'onglet "Rechercher Code VBA". Il y a une confusion de répertoire quelque part.
 
Dernière édition:
Bonjour @jclaborde, et merci pour le retour.
je pense que vous avez téléchargé la dernière version (V2_1) puisque vous avez apparemment récupéré les infos système du Debug.Print.
Par contre dans l'onglet "Liste Procédures", les liens ne sont pas valides
Cliquez pour agrandir...
Chez moi, ils fonctionnent. Avez-vous regardé quelle était l'adresse du lien hypertexte dans la cellule ?
les noms de fichiers mentionés ne se retrouvent pas dans l'onglet "Rechercher Code VBA"
Cliquez pour agrandir...
C'est normal :
- le tableau de la feuille "Rechercher Code VBA" affiche tous les composants des fichiers du répertoire qui correspondent aux critères sélectionnés dans la feuille (bouton Lancer la Recherche)
- le tableau de la feuille "Liste Procédures" affiche toutes les procédures des composants des fichiers du répertoire indépendamment des critères sélectionnés dans la feuille "Rechercher Code VBA" (bouton Lister toutes les procédures ...)
Il n'y a pas de lien entre les 2 tableaux autres que le répertoire sélectionné.
et quelques bugs dus à la protection des feuilles qui après un Unprotect dans les proc concernées fonctionnent.
Cliquez pour agrandir...
Concernant la protection des feuilles, j'ai ajouté la protection, sans doute à tort car elle apporte plus d'inconvénients que d'avantages, c'était pour éviter que l'on modifie les valeurs de certaines cellules, par exemple A2 (nommée Repertoire) qui est utilisée quand on lance la recherche.
Et, comme je l'indique dans les Contraintes "- éviter d’ouvrir l’éditeur VBE, de lancer le Débogueur.", source d'interruption du traitement en cours et donc de mauvais repositionnement des protect, unprotect.
Pour éviter cela, Public Const MODE_DEBUG = False.
Notamment pour x64 dans le formulaire
Cliquez pour agrandir...
Je suppose qu'il s'agit d'un problème lié à Windows 32 / 64 bits. Vous pouvez en dire plus ?
 
réponse

 
Bonjour jclaborde,
je ne comprends pas :
je viens de télécharger le fichier, je n'ai aucun problème à l'ouverture.
Dans votre capture d'écran de la feuille Liste Procédures, en arrière-plan le tableau correspond à mon jeu d'essai !!!
Normalement à l'ouverture le tableau est vide. Le chemin du lien hypertexte semble être aussi celui de mon jeu d'essai !!!
Je n'ai pas d'explication.
Le nom du dernier fichier que j'ai mis à disposition est Rechercher Code VBA V02_1.xlsm.
Est-ce bien celui que vous avez téléchargé ?
Si ce n'est pas le cas, pouvez-vous refaire un téléchargement et faire de nouveaux tests ?
Merci d'avance.
 
merci, c'est bien Rechercher Code VBA V02_1.xlsm que j'ai téléchargé. je le reprendrai à l'occasion
 
Nouvelle version 2.4 disponible. Son contenu :
- Correction de 2 erreurs (initialisation du 1er tableau à l'ouverture du fichier, fenêtre barre de progression Windows 32 / 64 bits)
- Suppression des protections des feuilles
- Suppression de la fonction activée par le bouton "Lister toutes les procédures ..." qui affiche dans la feuille "Liste Procédures", le tableau de toutes les procédures du répertoire sélectionné. J'ai créé une nouvelle ressource qui la remplace et est plus complète : Index de vos Macros avec Mots-Clés
 
Dernière édition:
Tout est ok maintenant
 
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- 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

Rechercher des termes dans le code VBA de tous les classeurs d'un répertoire [Supprimé]
Réponses
1
Affichages
378
Dudu2
Rechercher des termes / mots dans le code VBA de tous les classeurs d'un répertoire
2
Réponses
15
Affichages
1 K
Dudu2
C
  • Résolu(e)
XL 2019 Recherche dans les sous dossiers d'un répertoire via VBA sur excel
2
Réponses
27
Affichages
889
chaval
C
C
  • Résolu(e)
Autres Code VBA pour recherche et copie/coller de ligne avec mot clé.
Réponses
12
Affichages
682
Corentin26270
C
  • Résolu(e)
XL 2019 Aide pour un module d'archivage de feuille en pdf dans répertoire
Réponses
5
Affichages
826
Nico2978
VBA - Ajouter le Menu Système à un UserForm, le minimiser, restaurer, maximiser (boutons & code...
Réponses
1
Affichages
651
Dudu2
VBA - Ajouter le Menu Système à un UserForm, le minimiser, restaurer, maximiser (boutons & code...
Réponses
1
Affichages
452
Dudu2
Rechercher des valeurs dans une feuille Excel avec marquage visuel (couleur et flèche) des trouvés
Réponses
3
Affichages
1 K
Toubabou
T
  • Verrouillé
VBA - Ajouter le Menu Système à un UserForm, minimiser / restaurer, maximiser (boutons & code...
Réponses
1
Affichages
1 K
Dudu2
Créez votre propre moteur de recherche pour vos recettes de cuisine en HTML !
Réponses
1
Affichages
633
dysorthographie
L
  • Question Question
XL 2016 Recherche de partie de mot dans les cellules d'un tableau et extractions des résultats
2
Réponses
29
Affichages
2 K
Lorenzini
L
K
  • Résolu(e)
Microsoft 365 Ouvrir un autre classeur excel (VBA) pour utiliser les données de celui dans le classeur actif
Réponses
5
Affichages
1 K
Dranreb
  • Question Question
XL 2016 VBA : Ajouter dans le ruban 1 onglet / import d'un fichier excel / reconstruction de la mise en page de l'import Excel
Réponses
1
Affichages
599
Gégé-45550
A
  • Question Question
XL 2019 Besoin d'aide pour copier les lignes d'un classeur et les coller dans un autre classeur par le bié d'un bouton (VBA)
Réponses
7
Affichages
1 K
aka100k
A
L
  • Question Question
XL 2016 ouverture d'un fichier a partir d'un bouton commande dans userform
Réponses
3
Affichages
2 K
la bidouille
L
S
  • Résolu(e)
Autres Pourquoi les coches dans le filtre ne s'affiche pas malgré code VBA semble marcher (uniquement filtre personnalisé dans table base de données)
Réponses
6
Affichages
1 K
Scoub
S
J
  • Question Question
XL 2019 importer le contenu de plusieurs xlsx dans une même sheet d'un nouveau fichier excel
2 3
Réponses
34
Affichages
4 K
Hasco
N
  • Résolu(e)
XL 2016 Comment filtrer une listbox a mesure qu'on saisie dans textbox (2 colonnes)
2
Réponses
21
Affichages
5 K
ChTi160
P
  • Question Question
XL 2016 Extraire une Liste de fichiers en double dans un répertoire
Réponses
3
Affichages
585
Staple1600
D
  • Question Question
Microsoft 365 Code Sélectionner un graphique lié a un TCD dans une feuille de calcule EXCEL
Réponses
0
Affichages
604
DeeRose
D
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…