Word) (Application.DDERequest 方法
會使用開啟的動態資料交換 (DDE) 通道向接收應用程式要求資訊並以 字串 傳回資訊。
語法
expression。 DDERequest
( _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
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。