Uses an open dynamic data exchange (DDE) channel to send data to an application.
Security Dynamic data exchange (DDE) is an older technology that is not secure. If possible, use a more secure alternative to DDE, such as object linking and embedding (OLE).
expression.DDEPoke(Channel, Item, Data)
expression Optional. An expression that returns an Application object.
Channel Required Long. The channel number returned by the DDEInitiate method.
Item Required String. The item within a DDE topic to which the specified data is to be sent.
Data Required String. The data to be sent to the receiving application (the DDE server).
Remarks
If the DDEPoke method isn't successful, an error occurs.
Example
This example opens the Microsoft Excel workbook Sales.xls and inserts "1996 Sales" into cell R1C1.
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