WORD模板制作关于MacroButton域动作的求助

cncalyl

{Macrobutton TestMacro {CreateDate \@"YYYY年M月D日"}}

在Word模板制作中，我想要的效果是：比如，在Macrobutton域提示的日期处双击，通过TestMacroVBA过程，在当前位置处确认并插入提示的内容。

现在由于嵌套了两个域，结果显示的内层的域代码内容，而非我想要的日期：2015年6月12日

我用Selection.Fields(1).Code.Text取得的是提示代码，用什么成员或方法取得提示的日期内容？

具体内容见附件。

198307jia

{Macrobutton TestMacro {quote {CreateDate \@"YYYY年M月D日"} }}

cncalyl

谢谢你的热心回复，我想要的效果见新的附件。

liuhoubin168

Sub AcceptField()
    ScreenUpdating = False
    Selection.Fields(1).Unlink
    ScreenUpdating = True
End Sub

loquat

如果用VBA写域的话，请参考：
http://club.excelhome.net/thread-1115544-1-1.html

loquat

还有这个：
http://club.excelhome.net/thread-83863-1-1.html

cncalyl

loquat 发表于 2015-6-16 17:18
还有这个：
http://club.excelhome.net/thread-83863-1-1.html

谢谢liuhoubin168、loquat的热心回复，昨天就看见二位的回复了，上面来人了陪客，才回复，抱歉！Unlink可以基本实现我想要的效果。但，我还需要将{Macrobutton AcceptField xxx}中，xxx字体的Color、Size设置为与Macrobutton相同。正在学习提供的链接。。。