Excel: Compiler 2 cases de tous les fichier d'un dossier dans un

Fermé
Kett - 27 avril 2016 à 14:57
PHILOU10120 Messages postés 6385 Date d'inscription lundi 16 avril 2012 Statut Contributeur Dernière intervention 11 juin 2024 - 30 avril 2016 à 11:37
Bonjour,

Je souhaiterai compiler 2 cases par exemple la case 'A13' et 'B36' de tous les fichiers Excel du dossier 'Fiches clients global' pour que toutes les cases 'A13' sur retrouve dans la colonne 1 et 'B36' dans la colonne 2 et que pour chaque fichier une nouvelle ligne se créé.

J’espère être clair.

Merci pour votre aide.
Cdt.
A voir également:

3 réponses

PHILOU10120 Messages postés 6385 Date d'inscription lundi 16 avril 2012 Statut Contributeur Dernière intervention 11 juin 2024 802
28 avril 2016 à 11:42
Bonjour

Peut-on avoir le nom générique des fichiers s' il y en a un ?
0
Bonjour,

Les fichiers ont tous la même syntaxe: "Nom du client", "département", "ville".
Donc ça donne par exemple "Coté cuir 47 Marmande"
0
PHILOU10120 Messages postés 6385 Date d'inscription lundi 16 avril 2012 Statut Contributeur Dernière intervention 11 juin 2024 802
Modifié par PHILOU10120 le 29/04/2016 à 12:34
Bonjour

Avez vous une liste des fichiers.
Si oui on peut utiliser la fonction Adresse()

=indirect(ADRESSE(13;1;3;1;A1);1)&" "&=indirect(ADRESSE(36;2;3;1;A1);1)

le nom du fichier est en A1 = Coté cuir 47 Marmande

Je viens de corriger la formule j'avais oublié indirect() qui affiche l'information

C'est en forgeant que l'on devient forgeron. -  C'est au pied du mur que l'on voit le maçon - on apprend toujours de ses erreurs
0
Re,

Malheureusement, il y a plus de 1000 fichiers dans mon dossier.

Pensez vous que cela fonctionnera?

Cdt,
0
PHILOU10120 Messages postés 6385 Date d'inscription lundi 16 avril 2012 Statut Contributeur Dernière intervention 11 juin 2024 802
29 avril 2016 à 16:28
Bonjour

Faites un essai avec un ou deux fichiers
Mettre le chemin complet dans la cellule A1 et voir le résultat
Ou voir avec VBA je laisse les habitués vous faire des propositions
0
Bonjour,

Cela, ne fonctionne pas malheureusement, merci pour votre aide.
0
PHILOU10120 Messages postés 6385 Date d'inscription lundi 16 avril 2012 Statut Contributeur Dernière intervention 11 juin 2024 802 > Kett
30 avril 2016 à 11:37
Bonjour Kett

il faut récupérer le nom de chaque fichier avec cette formule

=CELLULE("nomfichier";A1) à mettre sur chaque feuille

on obtient ce résultat

F:\Téléchargement\[Fichier essai.xlsx]Feuil1

Après la formule pour concaténer

=INDIRECT(ADRESSE(5;5;3;1;A1);1)&" "&INDIRECT(ADRESSE(10;8;3;1;A1);1)

seul problème les fichiers doivent être ouverts

Donc voir avec les spécialistes du VBA
0