Word) (Application.DDETerminateAll 方法

會關閉由 Microsoft Word 開啟的所有動態資料交換 (DDE) 通道。

語法

expression。 DDETerminateAll

expression 代表 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 支援與意見反應。