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

VBA Access Discussion :

Générer classeur excel avec macro


Sujet :

VBA Access

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé
    Profil pro
    Inscrit en
    Novembre 2009
    Messages
    67
    Détails du profil
    Informations personnelles :
    Localisation : Suisse

    Informations forums :
    Inscription : Novembre 2009
    Messages : 67
    Par défaut Générer classeur excel avec macro
    Bonjour,

    Comment faire pour qu'un fichier Excel généré depuis Access (cette partie je sais faire) ait déjà une macro ?

    J'explique un peu plus en détail:

    Jusqu'à présent mon fichier Excel (généré depuis Access) contient une feuille récapitulative puis des feuilles avec le détail de chaque ligne de la page récapitulative.

    Cette page récapitulative a un bouton mais j'aimerais que quand je génére ce fichier la macro que j'aurai stipulé soit dans le classeur.

    Je vous remercie d'avance.

    --------------------------------------------------------------------------
    EDIT: En regardant sur le net j'ai trouvé qu'il est possible d'associer des macros à des fichiers excel j'ai donc créer une macro complémentaire avec le code que le bouton devrait normalement éxecuter mais je n'arrive pas à l'éxecuter quand je clique sur le bouton

    le code de ma macro :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
     
    Private Sub CommandButton1_Click()
        MsgBox "Sa marche"
    End Sub
    pas très recherché je sais

    par contre quand je tape CommandButton1_Click dans exécuter une macro le code à l'intérieur s’exécute bien.

    Si quelqu'un sait comment faire je suis preneur.

  2. #2
    Membre Expert
    Inscrit en
    Août 2006
    Messages
    1 588
    Détails du profil
    Informations forums :
    Inscription : Août 2006
    Messages : 1 588
    Par défaut
    Bonsoir,
    Cela devrait ressembler à ça
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
     
     set xlw = ActiveWorkbook
     With xlw.VBProject.VBComponents("ThisWorkBook").CodeModule
      x = .CountOfLines + 1
      .InsertLines x, "Private Sub CommandButton1_Click()"
      x = x + 1
      .InsertLines x, "MsgBox ""Sa marche"" "
      x = x + 1
      .InsertLines x, "End Sub"
      x = x + 1
     End With

Discussions similaires

  1. [XL-2010] Ouverture de classeur Excel avec macro depuis une macro
    Par kong985 dans le forum Macros et VBA Excel
    Réponses: 6
    Dernier message: 18/03/2015, 09h55
  2. [XL-2013] Suppression de doublons dans un classeur Excel avec utilisation d'une macro VBA
    Par gblassel dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 05/06/2014, 16h18
  3. [XL-2007] Copier un classeur excel avec une macro
    Par XceSs dans le forum Macros et VBA Excel
    Réponses: 3
    Dernier message: 07/12/2010, 19h03
  4. Ouverture de fichier Excel avec macros
    Par Mathusalem dans le forum MATLAB
    Réponses: 2
    Dernier message: 15/06/2006, 11h39
  5. probleme de selection aleatoire sur excel avec macro vba
    Par guillaume sors dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 21/10/2005, 10h51

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