Application.DDEPoke (Word)

Verwendet einen geöffneten DDE-Kanal (DDE = Dynamic Data Exchange/Dynamischer Datenaustausch) zum Senden von Daten an eine Anwendung.

Wenn die DDEPoke-Methode nicht erfolgreich ist, tritt ein Fehler auf.

DDEPoke (Channel, Item, Data)


Dim lngChannel As Long 
 
lngChannel = DDEInitiate(App:="Excel", Topic:="System") 
DDEExecute Channel:=lngChannel, Command:="[OPEN(" & Chr(34) _ 
 & "C:\Sales.xls" & Chr(34) & ")] 
DDETerminate Channel:=lngChannel 
lngChannel = DDEInitiate(App:="Excel", Topic:="Sales.xls") 
DDEPoke Channel:=lngChannel, Item:="R1C1", Data:="1996 Sales" 
DDETerminate Channel:=lngChannel

Arguments

Hier sind die benannte Argumente :

Channel - Long

Item (String) - Das Element innerhalb eines DDE-Themas, an das die angegebenen Daten gesendet werden sollen.

Data - String