Метод Application.DDETerminateAll (Word)

Статья
04/07/2023

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

Синтаксис

выражение. DDETerminateAll

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

Замечания

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

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

Пример

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

Поделиться через