Método Application.DDETerminateAll (Word)
Cierra todos los canales de intercambio dinámico de datos (DDE) que se abrieron con Microsoft Word.
Sintaxis
expresión. DDETerminateAll
expresión Variable que representa un objeto Application. Opcional.
Comentarios
Este método no cierra los canales abiertos en Word mediante aplicaciones cliente. La utilización de este método es igual que el uso del método DDETerminate para todos los canales abiertos.
Si interrumpe una macro que abre un canal DDE, puede dejarlo abierto sin darse cuenta. Los canales abiertos no se cierran automáticamente cuando finaliza una macro y cualquier canal que permanezca abierto consume recursos del sistema. Por esta razón, es aconsejable usar este método cuando se depura una macro que abra uno o más canales.
Ejemplo:
En este ejemplo se abre el libro Book1.xls de Microsoft Excel, inserta texto en la celda R2C3, guarda el libro y, a continuación, finaliza todos los canales DDE.
Dim lngChannel As Long
lngChannel = DDEInitiate(App:="Excel", Topic:="System")
DDEExecute Channel:=lngChannel, Command:="[OPEN(" & Chr(34) & _
"C:\Documents\Book1.xls" & Chr(34) & ")]"
DDETerminate Channel:=lngChannel
lngChannel = DDEInitiate(App:="Excel", Topic:="Book1.xls")
DDEPoke Channel:=lngChannel, Item:="R2C3", Data:="Hello World"
DDEExecute Channel:=lngChannel, Command:="[Save]"
DDETerminateAll
Vea también
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.