Syntax

DDEExecute channel, command$

Description

Executes a command in another application.

Comments

The DDEExecute statement takes the following parameters:

Parameter

Description

Channel

Integer containing the DDE channel number returned from DDEInitiate. An error will result if channel is invalid.

Command$

String containing the command to be executed. The format of command$ depends on the receiving application.

If the receiving application does not execute the instructions, a runtime error is generated.

Example

This example sets and retrieves a cell in an Excel spreadsheet. The command strings being created contain Microsoft Excel macro commands and may be concatenated and sent as one string to speed things up.

Sub Main()

  Dim cmd,q,ch%

  Q = Chr(34) ' Define quotation marks.

  Id = Shell("c:\excel5\excel.exe",3) 'Start Excel.

  ch% = DDEInitiate("Excel","Sheet1")

  On Error Resume Next

  cmd = "[ACTIVATE(" & q &"SHEET1" & q & ")]" 'Activate worksheet.

  DDEExecute ch%,cmd

  DDEPoke ch%,"R1C1","$1000.00"   'Send value to cell.

  'Retrieve value and display.

  MsgBox "The value of Row 1, Cell 1 is: " & DDERequest(ch%,"R1C1")

  DDETerminate ch%

  Msgbox "Finished..."

End Sub

See Also

DDEInitiate (function); DDEPoke (statement); DDERequest, DDERequest$ (functions); DDESend (function); DDETerminate (statement); DDETerminateAll (statement); DDETimeout (statement).

D