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 :

Ouvrir tous les fichiers d’un même dossier et en parcourir tous les onglets ?


Sujet :

Macros et VBA Excel

  1. #1
    Membre du Club
    Inscrit en
    Août 2005
    Messages
    217
    Détails du profil
    Informations forums :
    Inscription : Août 2005
    Messages : 217
    Points : 66
    Points
    66
    Par défaut Ouvrir tous les fichiers d’un même dossier et en parcourir tous les onglets ?
    Bonjour à tous,

    Voici mon besoin (je n’ai rien trouvé là-dessus dans la FAQ ni dans l’historique, désolé si cela a déjà été demandé).

    J’ai un fichier Excel de synthèse dans lequel je rapatrie des données en provenance de plusieurs fichiers sources.

    Ces fichiers sources sont de formats identiques et réalisés mensuellement, et tous classés dans un dossier distinct par mois. Le nombre d’onglets est variable selon les fichiers mais toutes les feuilles ont même forme et format.
    Tous les mois je désire donc lancer ma macro qui me copiera les données désirées dans le fichier de synthèse et les traitera.

    Je pense pouvoir créer le code général pour recopier les données que je désire dans mon fichier de synthèse, mais je ne sais pas comment ouvrir en séquence tous les fichiers de mon dossier, en parcourir tous les onglets pour en récupérer les données.

    Je vois deux pistes :
    - soit sélectionner directement le dossier depuis une boîte de dialogue
    - soit sélectionner le premier fichier depuis une boîte de dialogue, et les autres s’ouvriront automatiquement.

    Puis dans les deux cas parcourir onglet par onglet chacun des fichiers, appliquer mon traitement et si possible fermer les fichiers sources.

    Je suis débutant et je ne sais absolument pas :
    - comment je peux compter le nombre de fichiers de mon dossier et les ouvrir, sachant que le chemin du dossier est variable.
    - Comment les parcourir un à un fichier par fichier, feuille par feuille.

    Auriez-vous des pistes pour faire ceci ?
    Merci d’avance pour votre aide,
    M

  2. #2
    Expert éminent sénior
    Avatar de Caro-Line
    Profil pro
    Inscrit en
    Mars 2007
    Messages
    9 458
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mars 2007
    Messages : 9 458
    Points : 14 828
    Points
    14 828
    Par défaut
    Je vois quelques réponses dans la

    - Pour boucler sur les fichiers d'un répertoire
    Comment boucler sur les fichiers d'un répertoire ?
    A toi de modifier là où le nom du répertoire est en dur par la sélection du répertoire par une boite de dialogue (exemple : Comment choisir un répertoire (utilisation de BrowseForFolder) ? )

    -Pour boucler sur tous les onglets, je n'ai pas trouvé la FAQ précisément mais dans celle-ci :
    Comment supprimer les feuilles vides dans un classeur ?
    L'exemple donné boucle sur toutes les feuilles : tu peux t'en inspirer.

  3. #3
    Membre du Club
    Inscrit en
    Août 2005
    Messages
    217
    Détails du profil
    Informations forums :
    Inscription : Août 2005
    Messages : 217
    Points : 66
    Points
    66
    Par défaut
    Merci j'avais recherché ça dans la FAQ VBA, je trouvais logique de chercher là.

Discussions similaires

  1. Réponses: 2
    Dernier message: 19/12/2011, 18h20
  2. Ouvrir tous les fichiers d'un dossier
    Par VELO1222 dans le forum Macros et VBA Excel
    Réponses: 18
    Dernier message: 08/01/2011, 17h55
  3. Réponses: 7
    Dernier message: 16/09/2009, 09h34
  4. Réponses: 5
    Dernier message: 12/03/2009, 14h52
  5. Ouvrir tous les fichiers d'un dossier sauf celui de ma macro?
    Par drthodt dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 29/07/2008, 11h58

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