[摘要]topic1!'aaaaa'，dde服务器就会进行响应，根据主题和item读取一个及时数据，返回到当前的单元格。这样一来，我就可以定制一张excel表格，里面放上我想要的数据，这些数...
topic1!'aaaaa'，dde服务器就会进行响应，根据主题和item读取一个及时数据，返回到当前的单元格。这样一来，我就可以定制一张excel表格，里面放上我想要的数据，这些数据始终是最新的。
实现的步骤如下
1、导入所有所需的ddeml的api函数和常量
2、初始化dde对象
3、注册一个服务，并申请几个主题（topic）字符串
4、编写回调函数中的消息处理程序
5、编写相应消息进行取值的部分
要实现这一点，需要克服几个技术问题
1、受委托的回调函数的使用方法
2、数据回传到excel中的格式
3、消息处理过程
首先讲述问题3，
当用户往excel敲进公式时，ddeserver就会有响应，它会记下用户公式的各部分。
然后去查找实时信息，返回一个值，这个值就是要添入到当前cell中的值。
取到值后，调用ddeml的DdePostAdvise函数，它会激发回调函数的XTYP_ADVREQ消息
该消息中调用DdeCreateDataHandle函数，把这个新的值放回对应的cell中。
注意：DdePostAdvise的调用并不一定马上触发XTYP_ADVREQ消息，该函数内部使用PostMessage,
而不是sendMessage，系统会收集一些XTYP_ADVREQ消息一并处理，这时你就要区分那个cell对应那个值了。这个问题不难解决，你自己想办法吧。
讲述问题1，
dde初始化需要调用一个接受委托的回调函数
Public Declare Function DdeInitialize Lib "user32" Alias "DdeInitializeA" (ByRef pidInst As Integer, ByVal pfnCallback As DDECallBackDelegate, ByVal afCmd As Integer, ByVal ulRes As Integer) As Short
只要你试过一遍，就会觉得它的调用实际上很简单，这方面的资料也很多。关键就是回调函数声明的形式和定义的形式必须一致，否则将不能调用。
Private _DDECallBack As DDEML.DDECallBackDelegate = Nothing
_DDECallBack = New DDEML.DDECallBackDelegate(AddressOf DDECallBack)
Dim ddeinst As Integer
ddeinst = DDEML.DdeInitialize(g_lInstID, _DDECallBack, DDEML.APPCLASS_STANDARD, 0)
dde初始化函数被调用之后，当前进程就会把dde的消息添加到消息循环中，如果收到这些消息，就会调用这个回调函数DDECallBack来处理。
第2个问题
要想让cell接受你的值，随便传一个字符串它是不接受的，你要使用xltable格式传递，当然，如果你做的是dde客户端，什么格式也就无所谓了。（这时我经过大量的实验得到的，如果你有好办法，就请分享一下。）
10 00 04 00 01 00 03 00
tdtTable, cb=4, rows=1, columns=3
02 00 10 00
tdtString, cb=16
04 45 61 73 74
cch=4, East (tdtString continued)
04 57 65 73 74
cch=4, West (tdtString continued)
05 4e 6f 72 74 68
cch=5, North (tdtString continued)
我的最后问题是tdtTable不能填写多个cell，以上格式是微软文档中的，实际上不行，不知道为什么。把数据写在第一个td中。
关键词：如何运用.net设置ddeml？