Application.DDETerminateAll method (Word)

Закрывает все каналы динамического обмена данными (DDE), открытые в Microsoft Word.

Синтаксис

выражение. DDETerminateAll

выражение: переменная, представляющая объект Application. Необязательный параметр.

Примечания

Этот метод не закрывает каналы, открытые в Word клиентскими приложениями. Использование этого метода аналогично использованию метода DDETerminate для каждого открытого канала.

Если прервать макрос, открывающий канал DDE, можно случайно оставить канал открытым. Открытые каналы не закрываются автоматически при завершении макроса, и каждый открытый канал использует системные ресурсы. По этой причине рекомендуется использовать этот метод при отладке макроса, который открывает один или несколько каналов DDE.

Пример

В этом примере открывается книга Microsoft Excel Book1.xls, вставляется текст в ячейку R2C3, сохраняется книга, а затем завершаются все каналы 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

См. также

Объект Application

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.