Répondre à la discussion
Affichage des résultats 1 à 3 sur 3

Macro Excel qui pilote Word



  1. #1
    Golo_Ro

    Macro Excel qui pilote Word


    ------

    Bonjours a tout,

    Je ne suis pas un habitué de cette section du forum mais je me suis dit que je pourrais peut être y trouver de l'aide. J'essaye de faire une macro Excel qui pilote un document Word. L'idée est d'avoir un template word avec des parties vide, qui prendrait les valeurs du document Excel. Le but c'est de faire le calcul Excel, appuyer sur le bouton et hop ça génère un beau rapport Word pour présenter les chiffre.

    Je me dis que je dois pas etre le seul a avoir eu en tete de faire ça et pourtant j'ai pas trouvé enormement d'aide sur le sujet, et le debut de macro que j'ai fait pour commencer ne marche pas ! Ou plutot semble marcher 1 fois sur 10.

    Voila pour l'instant la macro:

    Code:
    Sub Macro_word_excel()
    
    Dim appWD As Word.Application
    Set appWD = CreateObject("Word.Application")
    appWD.Visible = True
    
    'On ouvre le template word'
        appWD.Documents.Open Filename:="Template_Test_macro.doc"
        
    'On ecrit 291.55 dans word
        appWD.Selection.MoveDown Unit:=wdLine, Count:=2
        appWD.Selection.MoveRight Unit:=wdCharacter, Count:=35
        appWD.Selection.TypeText Text:="291.55"
    
    'On enregistre le document word sous un nouveau nom
        appWD.ActiveDocument.SaveAs Filename:="Test_macro.doc"
    
    'On ferme word et on efface la mémoire
    ActiveWindow.Close
    appWD.Quit
    Set appWD = Nothing
    
    End Sub
    Voila donc pour l'instant il s'agit juste d'un tout debut pour ouvrir Word depuis excel marqué quelque chose et enregistrer. Par la suite le 291.55 sera lié a un cellule excel. Mais je ne vais pas plus loin car ça ne marche deja pas !

    J'ai essayé y a 5 min la 1ere fois il me dit que l'adresse du template est fausse, la 2eme fois CA A MARCHE, puis la 3eme fois il me redit que l'adresse du template et fausse, pi apres ça il fait que de dire "erreur 462 le serveur n'existe pas ou n'est pas disponible".

    Je pense qu'il y a un soucis au niveau de la memoire et du appWD mais j'arrive pas a comprendre quoi..

    Si quelqu'un a une idée...

    Merci

    -----
    Dernière modification par yoda1234 ; 19/08/2009 à 13h20.

  2. #2
    TiClic

    Re : Macro Excel qui pilote Word

    Chez moi ta macro marche bien si on corrige les espaces bizaroïdes dans ton programme.

    Au lieu de "Word.Application ", taper "Word.Application"

    et surtout :

    au lieu de "Template_Test_macro .doc" lire "Template_Test_macro.doc"

    Naturellement, ne pas oublier de cocher la case Microsoft Word 9.0 Object Library dans les librairies de référence, mais si tu ne l'avais pas fait, tu n'aurais eu aucun résultat.

  3. #3
    JDP1

    Re : Macro Excel qui pilote Word

    si tu veu tu peu aussi faire une macro en passant par enregistrer macro
    en faisant directement avec ta sourie l action que tu desire danns ton cas
    ouvrir une application

Discussions similaires

  1. macro excel
    Par alovesupreme dans le forum Logiciel - Software - Open Source
    Réponses: 0
    Dernier message: 25/01/2009, 17h12
  2. macro Excel
    Par gwendoline dans le forum Logiciel - Software - Open Source
    Réponses: 8
    Dernier message: 11/10/2008, 19h06
  3. M'aider à créer une petite macro sous word ou excel
    Par azeto dans le forum Logiciel - Software - Open Source
    Réponses: 29
    Dernier message: 16/04/2007, 12h12
  4. macro excel
    Par squall18 dans le forum Logiciel - Software - Open Source
    Réponses: 1
    Dernier message: 09/05/2006, 07h55
  5. Macro Word
    Par Eric78 dans le forum Logiciel - Software - Open Source
    Réponses: 5
    Dernier message: 20/02/2005, 20h13
Découvrez nos comparatifs produits sur l'informatique et les technologies.