Discussion :

[mijean94]

Bonjour à tous,

je recherche s'il est possible à partir d'excel, de faire lancer une Macro qui est dans Word pour exécuter une action ?

voici la macro qui est dans le doc word (créée en mode enregistrement car je ne maitrise pas le code) :

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
Sub m_dep_données_word()
 
 Application.ScreenUpdating = False
 
 Selection.MoveDown Unit:=wdLine, Count:=6 'deplace de 6 ligne vers le bas
 Selection.MoveDown Unit:=wdLine, Count:=7 ' deplace de 7 ligne vers le bas
 
    Selection.MoveRight Unit:=wdCharacter, Count:=1, Extend:=wdExtend
    Selection.Cut ' couper selection
 
    Selection.MoveDown Unit:=wdLine, Count:=218 'deplace de 218 ligne vers le bas
    Selection.MoveUp Unit:=wdLine, Count:=16 'deplace de 16 lignes vers le haut
 
    Selection.PasteAndFormat (wdFormatOriginalFormatting)
 
    Selection.MoveUp Unit:=wdLine, Count:=242 'deplace de 242 lignes vers le haut
 
 Application.ScreenUpdating = True
 
End Sub

ou bien mettre directement un code , qui va bien, dans Excel.

j'ai essayé de mettre ce code dans Excel mais ce me fonctionne pas.

Merci pour vos réponses

Cordialement

[hyperion13]

Salut
Dans le module Excel concerné, à adapter. La méthode ici.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Dim wrdApp As Object
Dim wrdDoc As Object
 
Set wrdApp = CreateObject("Word.Application")
wrdApp.Visible = True
Set wrdDoc = wrdApp.Documents.Open(ActiveWorkbook.Path & "\" & "doc1.docx")
wrdDoc.Activate
wrdDoc.Application.Run "NomMacro"

[Pierre Fauconnier]

Salut.

Perso, j'intégrerais plutôt la macro dans Excel. Le document word à traiter est le document actif? Es-tu sûr que tu peux travailler avec la sélection côté Word?

[mijean94]

Salut.

Perso, j'intégrerais plutôt la macro dans Excel. Le document word à traiter est le document actif? Es-tu sûr que tu peux travailler avec la sélection côté Word?

bonjour,

je n'en sais rien, j'ai juste un programme qui fonctionne , mais lorsque je déplace un élément forme avec signé intégré sur une autre page il ne fonction plus.
donc j'ai créer une macro auto sous word et lorsque je la lance ça déplace bien l'élément.

si il est possible de faire la même macro à partir d'excel, je suis preneur.

Cordialement