DDEInitiate Method Example

This example initiates a DDE conversation with the System topic and opens the Microsoft Excel workbook Sales.xls. The example terminates the DDE channel, initiates a channel to Sales.xls, and then inserts text into cell R1C1.

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