IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

Lister le contenu de cellules dans un fichier annexe


Sujet :

Macros et VBA Excel

  1. #1
    Futur Membre du Club
    Homme Profil pro
    Responsable R&D
    Inscrit en
    Août 2020
    Messages
    8
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 43
    Localisation : France, Ille et Vilaine (Bretagne)

    Informations professionnelles :
    Activité : Responsable R&D
    Secteur : Agroalimentaire - Agriculture

    Informations forums :
    Inscription : Août 2020
    Messages : 8
    Points : 5
    Points
    5
    Par défaut Lister le contenu de cellules dans un fichier annexe
    Bonjour à tous,

    Je me permets de vous solliciter car je suis actuellement devant un problème qui dépasse mes compétences.
    Je suis totalement néophyte en VBA mais je ne pense pas pouvoir y couper si je veux avancer !

    Voilà mon problème:
    Dans un même dossier "Recette",
    Je dispose d'un classeur "Répertoire recette" et des sous-dossiers "Recette 1", "Recette 2"... contenant eux mêmes des classeurs "Recette 11", "Recette 22"...
    (Voir pièce jointe)
    Je souhaiterais si c'est possible, lancer une routine du classeur "Répertoire recette" qui irait chercher dans les classeurs "Recettes xx" les contenus de différentes cellules et les lister dans les colonnes prévues à cet effet.

    J'espère que je suis assez clair même si pense que c'est plus parlant en ouvrant la pièce jointe.

    Merci pour votre aide.
    Fichiers attachés Fichiers attachés

  2. #2
    Membre éclairé
    Homme Profil pro
    Inscrit en
    Octobre 2013
    Messages
    383
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : Octobre 2013
    Messages : 383
    Points : 659
    Points
    659
    Par défaut
    Bonjour,

    As-tu toujours le même nombre de sous-dossiers ?
    As-tu toujours un seul fichier dans chaque sous-dossier ?
    J'imagine que les données doivent se mettre les unes en dessous des autres. Si oui, l'ordre a-t-il de l'importance ?
    Demain, je vais commencer par m'acheter des lunettes. Et après, je verrai bien.

  3. #3
    Futur Membre du Club
    Homme Profil pro
    Responsable R&D
    Inscrit en
    Août 2020
    Messages
    8
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 43
    Localisation : France, Ille et Vilaine (Bretagne)

    Informations professionnelles :
    Activité : Responsable R&D
    Secteur : Agroalimentaire - Agriculture

    Informations forums :
    Inscription : Août 2020
    Messages : 8
    Points : 5
    Points
    5
    Par défaut
    Bonjour,

    Merci pour ton aide.

    Non le nombre de sous-dossiers va aller en grandissant et certaines données des cellules peuvent évoluer.

    Je pense d'ailleurs qu'un effacement des colonnes à chaque lancement de routine serait idéal pour remettre à jour et éviter les doublons.

    Par contre il n'y a bien qu'un seul fichier par sous-répertoire.

    Oui, j'aimerais bien que les fichiers se rangent les uns au dessus des autres, mais peu importe l'ordre, je pourrai les filtrer après.

  4. #4
    Membre éclairé
    Homme Profil pro
    Inscrit en
    Octobre 2013
    Messages
    383
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : Octobre 2013
    Messages : 383
    Points : 659
    Points
    659
    Par défaut
    Je te propose le fichier ci-joint.
    J'ai pris la liberté de l'enregistrer au format xlsm sinon impossible d'exécuter les macros.
    J'ai également supprimé des colonnes pour que le format concorde avec les fichiers de recette (il y avait 2 colonnes surnuméraires).
    Tu peux rajouter des colonnes sans problème, mais il faut le faire également dans les fichiers de recettes sinon le copier coller va être décalé...

    Cette macro récursive boucle sur tous les dossiers puis sur tous les fichiers qu'elle trouve, peu importe le nombre de sous-dossiers et de fichiers et copie les données dans ton fichier de compilation.

    Teste-le avec de vraies données et dis-moi ce qu'il en est.

    Répertoire recette.xlsm
    Demain, je vais commencer par m'acheter des lunettes. Et après, je verrai bien.

  5. #5
    Futur Membre du Club
    Homme Profil pro
    Responsable R&D
    Inscrit en
    Août 2020
    Messages
    8
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 43
    Localisation : France, Ille et Vilaine (Bretagne)

    Informations professionnelles :
    Activité : Responsable R&D
    Secteur : Agroalimentaire - Agriculture

    Informations forums :
    Inscription : Août 2020
    Messages : 8
    Points : 5
    Points
    5
    Par défaut
    Ça fonctionne très bien.

    J'ai juste ajouté:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Worksheets("feuil1").Range("A2:G500").ClearContents
    en début de code, pour effacer la plage déjà remplie.

    Merci beaucoup, grâce à toi je vais passer un bon week-end !!!


+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. rechercher contenu cellule dans plusieurs fichiers
    Par affre dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 11/04/2016, 15h45
  2. Extraire le contenu d'une cellule dans un fichier excel
    Par JuniorBI dans le forum Développement de jobs
    Réponses: 2
    Dernier message: 28/09/2010, 13h03
  3. Réponses: 3
    Dernier message: 25/01/2007, 00h40
  4. [c#] Comment imprimer le contenu dune listbox dans un fichier
    Par Clarissa2006 dans le forum Windows Forms
    Réponses: 14
    Dernier message: 24/06/2006, 19h21
  5. [VBA] Copier une plage de cellules dans un fichier fermé
    Par SFrane dans le forum Macros et VBA Excel
    Réponses: 6
    Dernier message: 25/01/2006, 17h52

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo