Remplir automatique des fichiers excel à partir des informations d'un fichier

Signaler
-
 Layana -
Bonjour,

J'ai un fichier récapitulatif Excel avec une liste de code qui doivent être intégrées à plusieurs fichiers excel dont les noms sont en colonne A. Tous les fichiers sont situés dans le même dossier. Le fichier se présente ainsi:

Nom du fichier Excel Code
EnseigneCanada 123
EnseigneEgypte 124
EnseigneAustralie 125

J'aimerais intégrer tous les codes dans chaque fichier en fonction du nom du fichier.
Existe-t-il une macro qui permette de faire cela. J'ai plus de 1000 fichiers excel.
Merci de votre aide.


Configuration: Windows / Chrome 90.0.4430.212

7 réponses

Messages postés
16477
Date d'inscription
lundi 12 septembre 2005
Statut
Contributeur
Dernière intervention
10 juin 2021
3 189
Bonjour

Si j'ai compris
au classeur canada il faut ajouter ici 123 au nom de canada 123 au classeur recap soit
"canada_123.xlsx" ( il vaut mieux éviter les espaces) ^m punition pour les 999 autres...

Norrmalement, il n'est pas nécessaire d'ouvrir un classeur pour le renommer...

il faudrait que tu joignes un extrait du classeur récap pour te proposer une solution (VBA)
dans cette attente
Mettre le classeur sans données confidentielles en pièce jointe sur 
https://mon-partage.fr
Dans lien de téléchargement
faire un clic droit- copier l’adresse du lien et le coller dans le message en cours sur ccm



Messages postés
16
Date d'inscription
jeudi 9 juillet 2020
Statut
Membre
Dernière intervention
4 juin 2021
8
Bonjour,

Peut-être avec "collage spécial" ?

Cordialement
En fait je ne veux pas à avoir à ouvrir tous les fichiers excel. J'aimerais que ça se fasse de manière automatique
Messages postés
16
Date d'inscription
jeudi 9 juillet 2020
Statut
Membre
Dernière intervention
4 juin 2021
8
Je pense qu'au départ il faudra aller sur les fichiers concernés pour faire le collage avec liaison. Je ne vois pas d'autre solution, il faut bien dire au programme où et quelles informations il doit aller piocher.
Ensuite, après ce investissement en temps, tout se fera automatiquement
Merci.
J'ai envoyé les fichiers via le lien.
Cependant ce n'est pas tout à fait cela. Je ne veux pas renommer les fichier mais intégrer le code 123 par exemple dans une cellule que j'ai surligné en rouge.
Messages postés
16477
Date d'inscription
lundi 12 septembre 2005
Statut
Contributeur
Dernière intervention
10 juin 2021
3 189
Bonjour,

Rien reçu !!!

Je ne veux pas renommer les fichier mais intégrer le code 123 par exemple dans une cellule que j'ai surligné en rouge.

Pourquoi ne pas l'avoir annoncé au départ ?
il faudra donc ouvrir les milles fichiers , faire la modif sauvegarder et fermer: cela monopolisera ton ordi pendant pas mal de temps!

d'autre part, tu écris "surligner en rouge" : il y a t'il déjà quelque chose d'écrit dans cette cellule et existe t'il qu'une seule cellule rouge dans le classeur et qu'une seule page dans chaque classeur ?
Est elle issue d'une mise en forme conditionnelle ?
Cette cellule est elle toujours à la m^me adresse ?

Messages postés
16477
Date d'inscription
lundi 12 septembre 2005
Statut
Contributeur
Dernière intervention
10 juin 2021
3 189
Si ca peut t'^tre utile, code à adpter pour sélectionner la cellule rouge colorée manuellement en rouge dans une feuille

Sub trouver_cellule_couleur()
Application.FindFormat.Clear
Application.FindFormat.Interior.ColorIndex = 3
cellule = Cells.Find(What:="*", after:=Range("A65536"), SearchFormat:=True).Address
Range(cellule).Select
End Sub
Bonjour,
Désolée c'est la première fois que j'écris sur ce site.
Il y a une seule cellule vide qui se trouve toujours au même emplacement dans cet onglet.
Je vais essayer ton code merci
Messages postés
16477
Date d'inscription
lundi 12 septembre 2005
Statut
Contributeur
Dernière intervention
10 juin 2021
3 189 > Layana
J'attend toujours tes fichiers !!! :-(
je sens que je vais abandonner et laisser dans les mains de Jemaca...
Bonjour,
J'ai envoyé. J'essaie d'envoyer de nouveau peut-être que ça n'a pas marché.
https://mon-partage.fr/f/uIqQVbCT/

https://mon-partage.fr/f/79bAX92F/