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 :

[VBA-E] Ouvrir une série de fichiers à l'aide d'une boucle


Sujet :

Macros et VBA Excel

  1. #1
    Candidat au Club
    Profil pro
    Inscrit en
    Décembre 2006
    Messages
    2
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Décembre 2006
    Messages : 2
    Points : 2
    Points
    2
    Par défaut [VBA-E] Ouvrir une série de fichiers à l'aide d'une boucle
    Bonjour,

    Je débute en VBA. J'aimerais ouvrir une série de fichiers du type "tartanpion1.xls", "tartanpion2.xls"... à l'aide d'une boucle.
    J'ai tenté :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    Sub test()
    For j = 1 To 84
        Workbooks.Open Filename:="C:\...\tartanpion & j.xls"
    Next j
    End Sub
    et je me fait jeter...

    Je connais mal la syntaxe, si quelqu'un pouvait me donner un coup de main...
    Merci d'avance.

  2. #2
    Expert confirmé Avatar de illight
    Homme Profil pro
    Analyste décisionnel
    Inscrit en
    Septembre 2005
    Messages
    2 340
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 42
    Localisation : France, Bas Rhin (Alsace)

    Informations professionnelles :
    Activité : Analyste décisionnel
    Secteur : Service public

    Informations forums :
    Inscription : Septembre 2005
    Messages : 2 340
    Points : 4 295
    Points
    4 295
    Par défaut
    Citation Envoyé par Tiki40
    Bonjour,

    Je débute en VBA. J'aimerais ouvrir une série de fichiers du type "tartanpion1.xls", "tartanpion2.xls"... à l'aide d'une boucle.
    J'ai tenté :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    Sub test()
    For j = 1 To 84
        Workbooks.Open Filename:="C:\...\tartanpion & j.xls"
    Next j
    End Sub
    et je me fait jeter...

    Je connais mal la syntaxe, si quelqu'un pouvait me donner un coup de main...
    Merci d'avance.


    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    Sub test()
    For j = 1 To 84
        Workbooks.Open Filename:="C:\...\tartanpion" & j & ".xls"
    Next j
    End Sub

  3. #3
    Candidat au Club
    Profil pro
    Inscrit en
    Décembre 2006
    Messages
    2
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Décembre 2006
    Messages : 2
    Points : 2
    Points
    2
    Par défaut
    Nickel ! Merci !!

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

Discussions similaires

  1. Lier (attacher) une série de fichiers Excel protégés
    Par yboutin dans le forum Sécurité
    Réponses: 6
    Dernier message: 14/10/2009, 23h12
  2. Fichier n'executant qu'une série de macro sans s'ouvrir
    Par mordrhim dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 19/06/2007, 17h01
  3. [VBA-Excel] Ouvrir un lot de fichier txt dans Excel
    Par Trollakuir dans le forum Macros et VBA Excel
    Réponses: 8
    Dernier message: 30/06/2006, 10h02
  4. [VBA-E]ouvrir et choisir un fichier ?
    Par benjamin.garbolino dans le forum Macros et VBA Excel
    Réponses: 12
    Dernier message: 14/03/2006, 19h53
  5. Rechercher une chaîne de caractère dans une série de fichier
    Par Edoxituz dans le forum VB 6 et antérieur
    Réponses: 3
    Dernier message: 28/02/2006, 12h51

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