Application.DDEPoke (Word)

Utiliza un canal abierto de intercambio dinámico de datos (DDE) para el envío de datos a una aplicación.

Si el método DDEPoke no se realiza correctamente, se produce un error.

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

Estos son los argumentos con nombre :

Channel (Long) - El número de canal que devuelve el método DDEInitiate.

Item (String) - Elemento, parte de un tema DDE, al que se van a enviar los datos especificados.

Data (String) - Datos que se van a enviar a la aplicación receptora (servidor DDE).