Laisson dde

Fermé
baaachar13 Messages postés 1 Date d'inscription vendredi 1 août 2008 Statut Membre Dernière intervention 1 août 2008 - 1 août 2008 à 13:32
dandypunk Messages postés 831 Date d'inscription jeudi 3 janvier 2008 Statut Membre Dernière intervention 11 septembre 2011 - 1 août 2008 à 14:47
Bonjour,
salut comment etablir un connection ou laison dde entre l e word et excel quant everire l'excel sera ouvrira

2 réponses

m@rina Messages postés 20055 Date d'inscription mardi 12 juin 2007 Statut Contributeur Dernière intervention 22 avril 2024 11 269
1 août 2008 à 14:28
Bonjour,

Menu Outils, Options, Général => cocher l'option "Confirmation des conversions lors de l'ouverture".

m@rina
0
dandypunk Messages postés 831 Date d'inscription jeudi 3 janvier 2008 Statut Membre Dernière intervention 11 septembre 2011 82
1 août 2008 à 14:47
Il faut utiliser DDEInitiate

A la volée, le code est

Sub PiloterWordParExcel()
    Dim lCanal As Long
    
    Application.DisplayAlerts = False 'Désactive les messages d'alerte
    'Ouvre le fichier "Toto.DOC" Nb le fichier doit exister
    lCanal = Application.DDEInitiate("Winword", "E:\Documents\Toto.doc")
    'Ajoute du texte au fichier
    Application.DDEExecute lCanal, "Ce texte sera ajouté à Toto.doc"
    'Sauvegarde le fichier TOTO
    Application.DDEExecute lCanal, "[FILESAVE]"
    'Libère le canal
    Application.DDETerminate lCanal
    Application.DisplayAlerts = True
    
End Sub




0