Fusionner tous les classeurs excel d'un même dossier en un
Résolu/Fermé
Raphdu
Messages postés
46
Date d'inscription
mardi 10 septembre 2013
Statut
Membre
Dernière intervention
17 décembre 2013
-
12 sept. 2013 à 08:35
Raphdu Messages postés 46 Date d'inscription mardi 10 septembre 2013 Statut Membre Dernière intervention 17 décembre 2013 - 14 sept. 2013 à 14:48
Raphdu Messages postés 46 Date d'inscription mardi 10 septembre 2013 Statut Membre Dernière intervention 17 décembre 2013 - 14 sept. 2013 à 14:48
A voir également:
- Fusionner tous les classeurs excel d'un même dossier en un
- Liste déroulante excel - Guide
- Mettre un mot de passe sur un dossier - Guide
- Fusionner fichier excel - Guide
- Mise en forme conditionnelle excel - Guide
- Formule excel - Guide
4 réponses
Zoul67
Messages postés
1959
Date d'inscription
lundi 3 mai 2010
Statut
Membre
Dernière intervention
30 janvier 2023
149
12 sept. 2013 à 09:07
12 sept. 2013 à 09:07
Bonjour,
Au moment où tu écrivais ces lignes, j'ai pensé que c'était une autre méthode pour toi...
ça peut se résoudre en macro VBA.
cf. https://forums.commentcamarche.net/forum/affich-26327989-excel-fusionner-plusieurs-fichier-xls
A+
Au moment où tu écrivais ces lignes, j'ai pensé que c'était une autre méthode pour toi...
ça peut se résoudre en macro VBA.
cf. https://forums.commentcamarche.net/forum/affich-26327989-excel-fusionner-plusieurs-fichier-xls
A+
Raphdu
Messages postés
46
Date d'inscription
mardi 10 septembre 2013
Statut
Membre
Dernière intervention
17 décembre 2013
2
12 sept. 2013 à 11:43
12 sept. 2013 à 11:43
J'ai essayé la macro proposée mais j'obtiens l'
"erreur d'exécution '1004'
erreur définie par l'application ou par l'objet"
Quand je clique ok, j'obtiens
"mémoire insuffisante pour afficher en entier"
Qu'est ce que je peux faire?
Merci!
"erreur d'exécution '1004'
erreur définie par l'application ou par l'objet"
Quand je clique ok, j'obtiens
"mémoire insuffisante pour afficher en entier"
Qu'est ce que je peux faire?
Merci!
Zoul67
Messages postés
1959
Date d'inscription
lundi 3 mai 2010
Statut
Membre
Dernière intervention
30 janvier 2023
149
12 sept. 2013 à 11:58
12 sept. 2013 à 11:58
Essayer un autre code.
C'est évident que quelqu'un s'est déjà confronté à l'assemblage de fichiers
ex.
C'est évident que quelqu'un s'est déjà confronté à l'assemblage de fichiers
ex.
Sub consolide()récupéré là : https://www.excel-downloads.com/threads/fusionner-plusieurs-fichier-excel-en-un-unique.135408/ (rendons à...)
ChDir ActiveWorkbook.Path
Set classeurMaitre = ActiveWorkbook
sup
compteur = 1
nf = Dir("*.xls")
Do While nf <> ""
If nf <> classeurMaitre.Name Then
Workbooks.Open Filename:=nf
For k = 1 To Sheets.Count
Sheets(k).Copy After:=classeurMaitre.Sheets(classeurMaitre.Sheets.Count)
classeurMaitre.Sheets(classeurMaitre.Sheets.Count).Name = "Mapage" & compteur
compteur = compteur + 1
Next k
Workbooks(nf).Close False
End If
nf = Dir
Loop
End Sub
Raphdu
Messages postés
46
Date d'inscription
mardi 10 septembre 2013
Statut
Membre
Dernière intervention
17 décembre 2013
2
12 sept. 2013 à 12:09
12 sept. 2013 à 12:09
ça me dit
"erreur de compilation
Sub ou fonction non définie"
Je cherche d'autres fonctions mais pour l'instant, rien qui marche
"erreur de compilation
Sub ou fonction non définie"
Je cherche d'autres fonctions mais pour l'instant, rien qui marche
Zoul67
Messages postés
1959
Date d'inscription
lundi 3 mai 2010
Statut
Membre
Dernière intervention
30 janvier 2023
149
12 sept. 2013 à 12:17
12 sept. 2013 à 12:17
Supprime "sup" dans le code ci-dessus...
Raphdu
Messages postés
46
Date d'inscription
mardi 10 septembre 2013
Statut
Membre
Dernière intervention
17 décembre 2013
2
13 sept. 2013 à 10:25
13 sept. 2013 à 10:25
ça exécute mais c'est resté en cours d'exécution pendant plus de 3 heures hier et au final, ça n'a pas fonctionné. J'ai recommencé ce matin pour voir mais ça à l'air de faire pareil. Sur le côté, ça dit "Feuil900" et au dessus, alors que je n'ai que 205 feuilles.
Est-ce qu'il y a quelque chose d'autre à essayer?
Est-ce qu'il y a quelque chose d'autre à essayer?
Raphdu
Messages postés
46
Date d'inscription
mardi 10 septembre 2013
Statut
Membre
Dernière intervention
17 décembre 2013
2
13 sept. 2013 à 14:35
13 sept. 2013 à 14:35
ouais bah nan effectivement, après 4 heures d'exécution, j'obtiens:
"erreur d'exécution '1004':
Erreur définie par l'application ou par l'objet"
Y a t il une autre solution?
"erreur d'exécution '1004':
Erreur définie par l'application ou par l'objet"
Y a t il une autre solution?
Zoul67
Messages postés
1959
Date d'inscription
lundi 3 mai 2010
Statut
Membre
Dernière intervention
30 janvier 2023
149
14 sept. 2013 à 01:15
14 sept. 2013 à 01:15
S'il s'agit de fichier .xls (donc des versions anciennes de Excel), tu peux zipper ton classeur où tu veux regrouper les onglets + 2 fichiers de données et placer le zip sur https://www.cjoint.com/
Donne-moi le lien, et je regarderai.
Bonne nuit
Donne-moi le lien, et je regarderai.
Bonne nuit
Raphdu
Messages postés
46
Date d'inscription
mardi 10 septembre 2013
Statut
Membre
Dernière intervention
17 décembre 2013
2
14 sept. 2013 à 09:30
14 sept. 2013 à 09:30
voilà le lien: https://www.cjoint.com/?3IojByYZhUe
Merci!
Merci!