Importer info provenant de différents fichiers xls vers un seul fichier

  • Initiateur de la discussion Initiateur de la discussion goldenregis
  • Date de début Date de début

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 !

G

goldenregis

Guest
Bonjour à tous,


Voilà, j'ai un petit problème...J'ai à ma disposition dans un même dossier +- 300 fichiers excel qui ont le même format avec les mêmes types d'information dans les même cellules.
exemples :
en B1 = nom de la personne
en C1 = Prénom
en D1= couleur de cheuveux

A partir de ces fichiers, je dois créer un autre fichier dans lequel j'aurai une tableau rassemblant toute les informations des fichiers.
exemple :
colonne A : nom des 300 personnes
colonne B : prénom des 300 personnes
colonne C : cheveux des 300 personnes.

Afin d'y arriver connaissez-vous un méthode simple et rapide? Je me doute que via Visual Basic, on doit y arriver mais n'étant pas un pro p-e connaissez-vous d'autres manières.


Merci d'avance pour votre aide
 
Re : Importer info provenant de différents fichiers xls vers un seul fichier

Bonjour, bonjour,
Si fichiers texte , je suppose concaténation de fichier :
A adapter /

PREMFICH = Dir("F:\BOURSE\LISTES\TELECH1\")
DEUSFICH = Dir("F:\BOURSE\LISTES\TELECH2\")
TROIFICH = Dir("F:\BOURSE\LISTES\TELECH3\")

Set Fso = CreateObject("Scripting.FileSystemObject")
Set Ftxt1 = Fs😵penTextFile("F:\BOURSE\LISTES\TELECH1\" & PREMFICH, 1)
Set Ftxt2 = Fs😵penTextFile("F:\BOURSE\LISTES\TELECH2\" & DEUSFICH, 1)
Set Ftxt3 = Fs😵penTextFile("F:\BOURSE\LISTES\TELECH3\" & TROIFICH, 1)

Set Ftxt4 = Fso.CreateTextFile("F:\BOURSE\LISTES\VALEURS\VALEURESUM.txt")
Txt1 = Ftxt1.ReadAll
Txt2 = Ftxt2.ReadAll
Txt3 = Ftxt3.ReadAll

With Ftxt4
.writeline Txt1 & Txt2 & Txt3
End With
a+
 
Re : Importer info provenant de différents fichiers xls vers un seul fichier

Tout d'aobrd merci d'avoir pris le temps de m'aider...

hélas non ce ne sont pas des fichiers text, ce sont des fichiers excel qui doivent au final se retrouver dans un autre fichier 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
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

P
Réponses
6
Affichages
1 K
Pimprenelle9
P
Q
Réponses
10
Affichages
2 K
L
Réponses
10
Affichages
2 K
M
Réponses
2
Affichages
2 K
mmaatthh
M
V
Réponses
2
Affichages
1 K
Val119
V
Y
Réponses
8
Affichages
1 K
yesyes18
Y
D
Réponses
1
Affichages
2 K
DukeDevlin
D
Retour