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 :

Création automatique de fichier [XL-2007]


Sujet :

Macros et VBA Excel

  1. #1
    Membre averti
    Profil pro
    Étudiant
    Inscrit en
    Mai 2010
    Messages
    33
    Détails du profil
    Informations personnelles :
    Âge : 34
    Localisation : France, Deux Sèvres (Poitou Charente)

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Mai 2010
    Messages : 33
    Par défaut Création automatique de fichier
    Bonjour à tous

    Je planche depuis quelque jour sur une macro mais je tombe sur une erreur récurrente

    Pour info je fonctionne sous excel 2007

    Mon objectif est de générer automatiquement des fichiers. Je dispose d'un fichier modèle et d'un autre classeur excel contenant l'ensemble des informations qui change (genre : nom prénom adresse...)

    Je désire parcourir le tableau d'information pour créer automatiquement les fichiers à partir du classeur modèle (suis-je clair ???)

    J'ai donc réalisé cela j'aimerai savoir ce qui ne va pas
    sachant que je présente mon code sans la boucle qui parcours le tableau d'information je la ferai qu'après

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    31
    32
     
    Sub gene_appel_a_fact()
    '
    ' gene_appel_a_fact Macro
    '
     
    '
        Dim liste As Worksheet
        Dim output As Worksheet
        Dim modele_s As String
        Dim appExcel As Excel.Application 'Application Excel
     
        'Ouverture de l'application
        Set appExcel = CreateObject("Excel.Application")
     
    'variable contenant mon modèle 
        modele_s = "C:\chemin\Modèle.xltx"
     
        Set liste = appExcel.Workbooks.Open("C:\chemin\Liste.xlsx").Worksheets(1)
     
       Set output = Workbooks.Add(modele_s).Worksheets(1)
     
        output.Range(E11) = liste.Range("D" & 4 + i).Text
        output.Range(E12) = liste.Range("E" & 4 + i).Text
        output.Range(E13) = liste.Range("F" & 4 + i).Text & " - " & liste.Range("G" & 4 + i).Text
        output.Range(E15) = liste.Range("H" & 4 + i).Text
     
        output.SaveAs Filename:= _
        "C:\chemin\"&output.Range(B17) & ".xlsx", FileFormat:= _
        xlOpenXMLWorkbook, CreateBackup:=False
     
    end sub
    Alors je m'excuse d'avance pour toute les énormes erreur de syntaxe que j'aurai pu faire je suis que bidouilleur en vba.

    merci de votre aide

  2. #2
    Expert éminent Avatar de mercatog
    Homme Profil pro
    Inscrit en
    Juillet 2008
    Messages
    9 435
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Autre

    Informations forums :
    Inscription : Juillet 2008
    Messages : 9 435
    Par défaut
    Rapidementles guillemets
    Le i vaut quoi?

    Fait un pas à pas (F8), et regarde sur quelle ligne ça coince

  3. #3
    Membre averti
    Profil pro
    Étudiant
    Inscrit en
    Mai 2010
    Messages
    33
    Détails du profil
    Informations personnelles :
    Âge : 34
    Localisation : France, Deux Sèvres (Poitou Charente)

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Mai 2010
    Messages : 33
    Par défaut
    J'ai honte

    Donc mon erreur venai des guillemets.

    Quant au i c'est mon itérateur il me permettra de parcourir les lignes de mon tableau d'information

    Je vous remercie mais c'est vraiment une erreur c.. je suis désolé de vous avoir dérangé pour ça ....

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

Discussions similaires

  1. Réponses: 5
    Dernier message: 09/02/2014, 15h32
  2. Réponses: 0
    Dernier message: 21/06/2011, 11h14
  3. Problème de date et de création automatique de fichier
    Par bomonde dans le forum Scripts/Batch
    Réponses: 17
    Dernier message: 17/02/2009, 15h01
  4. Création automatique de fichiers
    Par Bes74 dans le forum VBA Access
    Réponses: 5
    Dernier message: 11/12/2007, 22h24
  5. création automatique de fichier html
    Par oclone dans le forum EDI, CMS, Outils, Scripts et API
    Réponses: 4
    Dernier message: 03/02/2006, 15h53

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