Word) (Application.DDERequest 方法

會使用開啟的動態資料交換 (DDE) 通道向接收應用程式要求資訊並以 字串 傳回資訊。

語法

expressionDDERequest( _Channel_ , _Item_ )

expression 代表 Application 物件的變數。 選用。

參數

名稱 必要/選用 資料類型 描述
通道 必要 Long DDEInitiate 方法傳回的通道號碼。
Item 必要 String 所要要求的項目

註解

當您要求伺服器應用程式中之主題所含的資訊時,必須指定您要求內容之主題中的項目。 例如,在 Microsoft Office Excel 中,儲存格都是有效項目,而您可以使用 "R1C1" 格式或具名參照方式參考它們。

Microsoft Excel 和其他支援 DDE 的應用程式會辨識名為「System」 的主題。下表說明系統主題中的三個標準專案。 請注意,使用 SysItems 項目,即可取得 System 主題之其他項目的清單。

System 主題中的項目 效果
SysItems 會傳回 System 主題中之所有項目的清單
Topics 會傳回所有可用主題的清單
Formats 會傳回 Word 所支援之所有剪貼簿格式的清單

範例

此範例會開啟 Excel 活頁簿 Book1.xls,並擷取儲存格 R1C1 的內容。

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") 
MsgBox DDERequest(Channel:=lngChannel, Item:="R1C1") 
DDETerminateAll

此範例會在 Excel 中開啟與 System 主題之間的通道,然後使用 Topics 項目傳回可用主題的清單。 此範例也會在選取範圍後面插入包含所有開啟中活頁簿的主題清單。

Dim lngChannel As Long 
Dim strTopicList As String 
 
lngChannel = DDEInitiate(App:="Excel", Topic:="System") 
strTopicList = DDERequest(Channel:=lngChannel, Item:="Topics") 
Selection.InsertAfter strTopicList 
DDETerminate Channel:=lngChannel

另請參閱

Application 物件

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應