Application.DDEPoke (Word)

Utilise un canal ouvert d'échange dynamique de données (DDE) pour envoyer des données vers une application.

Si la méthode DDEPoke échoue, une erreur se produit.

DDEPoke (Channel, Item, Data)

Dim lngChannel As Long 
 
lngChannel = DDEInitiate(App:="Excel", Topic:="System") 
DDEExecute Channel:=lngChannel, Command:="[OPEN(" & Chr(34) _ 
 & "C:\Sales.xls" & Chr(34) & ")] 
DDETerminate Channel:=lngChannel 
lngChannel = DDEInitiate(App:="Excel", Topic:="Sales.xls") 
DDEPoke Channel:=lngChannel, Item:="R1C1", Data:="1996 Sales" 
DDETerminate Channel:=lngChannel

Arguments

Les arguments nommés :

Channel (Long) - Numéro de canal renvoyé par la méthode DDEInitiate.

Item (String) - Élément de rubrique DDE vers lequel les données spécifiées sont à envoyer.

Data (String) - Données à envoyer à l'application destinataire (le serveur DDE).