Application.DDETerminate (Word)

Fecha o canal especificado de intercâmbio dinâmico de dados DDE para outro aplicativo.

DDETerminate (Channel)

Channel: O número do canal retornado pelo método DDEInitiate.

Dim lngChannel As Long 
 
lngChannel = DDEInitiate(App:="Excel", Topic:="System") 
DDEExecute Channel:=lngChannel, Command:="[New(1)]" 
DDETerminate Channel:=lngChannel