Recherchev sur X fichiers Résolu/Fermé

Question

Bonjour,

Depuis un fichier, comment effectuer une recherchev sur tous les fichiers d'un autre répertoire ?

Répertoire C:\SOURCE\

&

Répertoire C:\fichiers\

rechechev =

valeur cherchée colonne A Fichier1

table_matrice colonne J à colonne BA (sur tous les fichiers)

N° index col = 43

Mon problème est le suivant dans le répertoire, il peut y avoir 10 comme 100 fichiers.

Comment faire pour effectuer une recherchev, sur tous les fichiers ? Qu'importe le nombre de fichiers à interroger ?

Merci d'avance !

Bien cordialement,

Windows / Firefox 102.0

yg_be · Answer

bonjour,

il faut s'arreter à la première valeur trouvée?

cousinhub29 · Answer

Bonjour,

Est-ce que ta boîte est toujours en Office2010?

Si vous avez migré en 2016, on pourrait également utilisé Power Query....

Dans l'affirmative, est-ce que tous les fichiers compris dans le répertoire de recherche ont la même structure?

Sinon, on peut quand même tester avec ton PC Perso (365, il me semble...) - Il suffit pour cela que tu joignes 2 fichiers anonymisés de recherche, et ton fichier anonymisé également à partir duquel tu souhaites récupérer tes données...

@ te relire

cousinhub29 · Answer

Re-,

Si tu as 2016, tu as Power Query.... C'est en natif avec la version

cousinhub29 · Answer

Ok,

Vraiment désolé pour toi, reste à espérer que yg_be te trouvera une solution (mais j'en doute pas trop...)

Bonne journée

cousinhub29 · Answer

Re-,

Déjà, bonne nouvelle..

Par contre, je pense que si tu fournissais (comme demandé un peu plus tôt) des fichiers exemples, anonymisés, mais avec la structure exacte de tes fichiers réels - nb d'onglets, les noms des fichiers à "scanner" ont-ils des bases communes?, bref, tout ce qui pourrait être utile...

Je t'expliquerai alors ce qu'il te faudra faire, pour adapter à ton environnement.

@ te relire

PYGOS69 · Answer

Exemple de fichier Source

https://www.cjoint.com/c/MFuhBYVyjNC

Exemple de fichier Cible

https://www.cjoint.com/c/MFuhDbSyMxC

cousinhub29 · Answer

Re-,

Dans les fichiers "Source", les titres ont tous le même nom?

Quels sont les en-têtes des colonnes J, AZ et BA?

cousinhub29 · Answer

Ok,

Finalement, j'évite les noms d'en-têtes, je ne travaille que sur les numéros de colonne...

Dans le Zip joint, 3 fichiers :
- Le premier "PQ_Pygos", effectue la récupération des données (à mettre dans un répertoire quelconque, différent du répertoire contenant les fichiers à scanner)

- Les 2 autres, des fichiers bidons, avec quelques données (à enregistrer dans un même répertoire)

Pour commencer, il faut configurer le niveau de confidentialité (qui ne sert à rien), et à faire une bonne fois pour toute (j'ai mis la procédure dans le fichier PQ)

Dans l'onglet "Paramètres", tu as donc cette procédure, mais aussi la cellule C2 à renseigner :
Mettre dans cette cellule le chemin du répertoire contenant tous les fichiers à scanner

Une fois mis à jour ce chemin, tu copies/colles tes données de ton onglet (de A à AY). J'ai nommé cette plage "T_Data", qui couvre donc de A1:AYxxxx)

Il n'y a rien dans les colonnes AZ ni BA, ces colonnes sont rajoutées par la requête (j'ai également ajouté le nom du fichier où on a trouvé les correspondances...)

Si tu ne t'en sors pas, on va y aller pas-à-pas...

https://www.cjoint.com/c/MFuktYNtBBC

Bon courage

cousinhub29 · Answer

Re-,

On va privilégier les "Réponses" aux "Commentaires", je trouve la lecture du fil bien plus aisée...

Lorsque tu es dans l'éditeur PQ, à gauche, les requêtes, et à droite, les étapes

Tu cliques sur la requête "T_Final", puis sur l'étape "SupprCol2"

Quel est le mot dans la 1ère ligne de la 3ème colonne?

Tu retiens ce nom, puis, 2 étapes plus bas, tu remplaces le "Name" par ce mot :

= Table.RenameColumns(PromoHead,{{"Name", "Fichier"}})

A cette étape, je renommais la colonne "Name" par "Fichier"

Essaie, puis on continue...

cousinhub29 · Answer

Heu, c'est bizarre, il n'y a aucune données?

Dans la requête "T_Recup", tu as des données, à chaque étape?

cousinhub29 · Answer

Re-,

T_Recup, étape "Selections", tu as quoi?

Regarde le fichier ppt joint, j'y ai mis les étapes de la requête "T_Recup"

Tu me dis à quelle étape (hormis évidement les noms de fichiers), on n'a plus les mêmes "données"

https://www.cjoint.com/c/MFunxArEb8C

cousinhub29 · Answer

Ok, donc on va descendre

Regarde mon fichier..

A l'étape suivante, tu as des données?

PS, il me vient un doute...

Combien d'onglets dans tes fichiers à scanner?

Est-ce que l'onglet contenant les données est bien le premier onglet?

cousinhub29 · Answer

Re-,

Je ne sais pas si je parle français...

Je t'ai demandé d'utiliser "Répondre", et non "Commenter"...

Bref...

As-tu regardé mon fichier powerpoint?

Est-ce que tu as des données à l'étape "Expand", de la requête "T_Recup"? (regarde bien vers la droite, également)

PYGOS69 · Answer

Je viens de vérifier l'ensemble des requêtes, après lecture du powerpoint et je viens de relancer.

Etape "Expand" = null

La différence par rapport au powerpoint, C'est à l'étape SupprCol, j'ai null

Combien d'onglets dans tes fichiers à scanner?

3

Est-ce que l'onglet contenant les données est bien le premier onglet?

Oui après rectification ! Il est nommé Feuil1 désormais..

Je désespère............

PYGOS69 · Answer

.../

Dans T_RECUP SupprCol, j'obtiens enfin des résultats (certaines lignes sont toujours = null), mais d'autres renvoient des infos........

Mais toujours plantage T_Final, cette fois-ci dans la colonne "Date contact" .

Je vérifie les fichiers pour avancer.....

cousinhub29 · Answer

Re-,

La position de l'onglet est bien en première? (le nom importe peu, c'est la position)

Est-ce que tu as besoin des autres onglets?

Sinon, quelle colonne est forcément remplie?

Admettons la colonne J.

Dans la requête "T_Recup", tu cliques sur l'étape "DemoteHead", tu sélectionnes la colonne 11, puis tu cliques sur le Filtre, et tu décoches "null"

Est-ce que ça s'améliore? (n'aies aucune crainte, on n'intervient pas du tout sur les fichiers réels)

PYGOS69 · Answer

.../

J'avance ! j'ai testé avec un seul fichier,

Dans T_RECUP, je retrouve toutes les infos.

J'ai décoché "null"

Dans T_Final, lorsque je réactualise tout, un message apparait [Epression.Error] Désolé ...Nous n'avons pas trouvé la colonne "Date contact" de la table.

T_FINAL = !Téléchargement non effectué

J'ai les résultats sur T_RECUP, mais du coup dans mon tableau EXCEL je ne récupère rien, pour l'instant.....

PYGOS69 · Answer

.../

Est-ce que tu as besoin des autres onglets ?

Non (j'ai laissé que la Feuil1)

Sinon, quelle colonne est forcément remplie ?

Colonne J

cousinhub29 · Answer

Yes, ça avance...

On a réussi à faire fonctionner T_Recup, reste T_Final

La seule fois où on fait référence à "Date contact", c'est la dernière étape de cette requête.

Regarde bien comment est nommée la première colonne, et remplace dans la formule :

= Table.TransformColumnTypes(Rename,{{"Date contact", type date}})

On va y arriver... :)

PYGOS69 · Answer

Dernière étape de la requête :

ModType

= Table.TransformColumnTypes(PromoHead,{{"Date contact", type date}})

remplacé par

= Table.TransformColumnTypes(Rename,{{"Date contact", type date}})

Expression.Error : Le nom « Rename » n'a pas été reconnu. Veuillez vérifier qu'il est correctement orthographié.

cousinhub29 · Answer

Qu'est-ce que tu as mis dans la barre de formules?

Comment s'appelle la 1ère colonne?

PYGOS69 · Answer

= Table.TransformColumnTypes(Rename,{{"Date contact", type date}})

Comment s'appelle la 1ère colonne?

A quelle étape de la requête T_Final ?

cousinhub29 · Answer

C'est bien dans la dernière étape.

Lorsque tu es dans l'éditeur PQ, ruban "Accueil", tu as un bouton "Éditeur avancé".

Quand tu cliques dessus, tu as accès à tout le code en 1 fois, et ce code c'est :

let
    Source = Excel.CurrentWorkbook(){[Name="T_Data"]}[Content],
    DemoteHead = Table.DemoteHeaders(Source),
    SupprCol = Table.SelectColumns(DemoteHead,{"Column1"}),
    AjtIdx = Table.AddIndexColumn(SupprCol, "Index", 1, 1),
    Fusion = Table.NestedJoin(AjtIdx, {"Column1"}, T_Recup, {"Column11"}, "T_Recup", JoinKind.LeftOuter),
    Expand = Table.ExpandTableColumn(Fusion, "T_Recup", {"Column1", "Column11", "Column53", "Column54"}, {"Column1.1", "Column11", "Column53", "Column54"}),
    Tri = Table.Sort(Expand,{{"Index", Order.Ascending}}),
    SupprCol2 = Table.SelectColumns(Tri,{"Column53", "Column54", "Column1.1"}),
    PromoHead = Table.PromoteHeaders(SupprCol2, [PromoteAllScalars=true]),
    Rename = Table.RenameColumns(PromoHead,{{"Name", "Fichier"}}),
    ModType = Table.TransformColumnTypes(Rename,{{"Date contact", type date}})
in
    ModType

Ici, tu peux changer directement "Date contact" de la dernière ligne, et remplacer par le nom exact du titre de la 1ère colonne

PYGOS69 · Answer

Ou je trouve le titre de la 1ère colonne ? ( colonne 11, colonne 53, colonne 54...?)

Sur le tableau ?

sur les requêtes, laquelle et à quel niveau ?

cousinhub29 · Answer

Re-,

Ici, tu vois la colonne "Date contact"

Chez toi, elle s'appelle comment?

Et dans la requête "T_Final", tu cliques sur l'étape "ModType", et tu as ceci :

Dans la barre de formule, "Date contact" doit être remplacé par le nom de la 1ère colonne

PYGOS69 · Answer

Non, malheureusement, j'ai une erreur ! Et pas de résultat dans T_Final. En avant-dernière étape, j'ai "null" dans 3 colonnes ....

T_Recup c'est bon mais pas T_Final

cousinhub29 · Answer

Ok,

Quand tu as une erreur, tu as un avertissement jaune?

Si oui, en cliquant sur "Atteindre l'erreur", ça donne quoi?

En plus, tu vas faire ces 2 manips:

- Dans T_Recup, tu sélectionnes la colonne 11 (qui correspond donc à la colonne J), tu cliques sur le petit symbole à côté du titre "ABC,123", et tu sélectionnes "Texte"

Dans la requête "T_Final", tu sélectionnes l'étape "AjtIdx" (comme Ajout Index), et pareil, tu cliques sur le petit symbole, et tu sélectionnes "Texte" (tu vas avoir un msg d'avertissement comme quoi PQ va te demander si tu veux insérer une étape, tu cliques sur "Insérer"

PYGOS69 · Answer

ça bloque à partir de l'étape Expand

cousinhub29 · Answer

Ok, il met quoi comme msg d'erreur?

cousinhub29 · Answer

Re-,

Je m'étonne des "cellules" contenant "null" dans la première ligne...

Tu devrais normalement avoir les en-têtes des colonnes...

Je te propose de continuer demain, dans ce dépannage "hot-line"???

Je pense que le souci vient d'un peu plus haut

Bonne soirée

PYGOS69 · Answer

Dans T_Final, ModType, lorsque je réactualise tout, un message apparait [Epression.Error] Désolé ...Nous n'avons pas trouvé la colonne "Date contact" de la table.

Toutes les étapes T_Final sont à revoir......Merci !

Je reprendrais tout ça demain,......

Bonne soirée !

cousinhub29 · Answer

Re-,

Juste avant de quitter, et pour bien préparer la suite...

Peux-tu me montrer ce que donne :

Ruban "Formule", "Gestionnaire de noms" :

Bonne soirée

cousinhub29 · Answer

Bonjour,

OK, vu tes zones nommées ou Tableaux, pas de soucis de ce côté.

On va donc travailler sur le T_Final.

Quand tu as sélectionné cette requête, et que tu sélectionnes l'étape "Fusion", puis en cliquant sur la première ligne contenant le mot "Table", tu as un aperçu en bas.

Tu peux me montrer ce qu'il y a?

PYGOS69 · Answer

Bonjour,

J'ai tout repris ce matin et j'avance....

J'ai tout remis au Format Texte vu que l'élément recherché avait 13 chiffres....

Dans EXPAND, il apparaissait beaucoup de "null", du coup j'ai filtré sans "null"

Et enfin j'ai récupéré les éléments recherchés !

Reste l'erreur dans la dernière étape :

Date contact en column53 semble correct ??

[Expression.Error]L'importation Rename ne correspond à aucune exportation. Avez-vous oublié une référence de module ?

cousinhub29 · Answer

Re-,

Je n'ai rien oublié...

Dans les étapes de T_Final, comment se nomme l'étape juste avant ModType (étape où se situe l'erreur)?

Si cette étape a un nom différent de Rename, il faut mettre le nouveau nom en lieu et place.

Je ne sais pas si tu as remarqué, toutes les étapes sont reprises dans l'étape suivante (selon le code utilisé, mais en général, c'est la règle)

PYGOS69 · Answer

Eurêka j'ai trouvé !

Expand

J'ai filtré sans "null"

= Table.SelectRows(Expand, each ([Column1.1] <> null))

ModType

J'ai modifié

= Table.TransformColumnTypes(PromoHead,{{"Date contact", type date}})

Encore un grand Merci ! Pour ton expertise et ta patience !!

Il me reste à trouver de la documentation sur PoWer Query

cousinhub29 · Answer

Nickel,

Pour commencer un peu avec PQ, tu peux déjà regarder de ce côté pour les bases, par ici ou ici pour appréhender le code M.

Tu n'as pas donné le résultat????

Tu as réussi à tout obtenir? En combien de temps approximativement?

cousinhub29 · Answer

Ah, et j'oubliais...

L'avantage avec PQ, c'est que tu deviens indépendant très rapidement.

Un tel "hot-line" eût été quasiment impossible avec du VBA. Ici, tout se fait (pratiquement) à la main, et pour bien commencer, c'est conseillé de tout faire manuellement, ensuite, on peut rentrer dans du langage codé bien plus élaboré.

Bonne journée

PYGOS69 · Answer

Le résultat se fait en quelques secondes !

Bonne journée !

Recherchev sur X fichiers

40 réponses

Discussions similaires

Newsletters