Bonjour,

J'ai crée une macro VBA sur Windows-Excel 2003 qui ouvre un fichier Word et qui y copie des informations.

J'ai du l'installer sur un MAC (Word 2004 pour MAC), lorsque je l'utilise il me met l'erreur suivante :

"Erreur d'exécution 1004. La méthode 'DDEInitiate' de l'objet '_Application' a échoué"

Voilà mon code PC :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
   If Range("C6") = "Mémoire validé" Then
        channelNumber = Application.DDEInitiate( _
        app:="WinWord", _
        topic:="C:\Dossier\Fichier1.doc")
    Else
        channelNumber = Application.DDEInitiate( _
        app:="WinWord", _
        topic:="C:\Dossier\Fichier2.doc")
    End If
En étant allé voir sur MSDN, j'ai adapté mon code comme ceci :

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
   If Range("C6") = "Mémoire validé" Then
        Shell "SERVEUR:Dossier1:Dossier2:Dossier3:Fichier1"
        Do
            channelNumber = Application.DDEInitiate( _
                app:="MSWord", _
                topic:="SERVEUR:Dossier1:Dossier2:Dossier3:Fichier1")
        Loop Until TypeName(channelNumber) <> "Error"
    Else
        Shell "SERVEUR:Dossier1:Dossier2:Dossier3:Fichier2"
        Do
            channelNumber = Application.DDEInitiate( _
                app:="MSWord", _
                topic:="SERVEUR:Dossier1:Dossier2:Dossier3:Fichier2")
        Loop Until TypeName(channelNumber) <> "Error"
    End If
Mais ça indique toujours la même erreur. Quelqu'un peut-il me dépanner ?