在word文档中插入数据变量(100分)

要在word文档中插入数据变量，要怎样做才能在下次打开时能够修改呢
我的思路是word中做几对标签，每对标签之间就是变量。以后打开时搜索标签号的位置，这样就可以任意移动变量的位置，但是我不知道具体的实现方法，请大家赐教。给出例子来

可以用WORD替换功能试一试。
with WORD.SelectRange.Find do begin
Text :='【☆☆☆☆☆】';
Replacement.Text := 【*****】;
ReFindText:=EmptyParam;
ReMatchCase:=EmptyParam;
ReMatchWholeWord:=EmptyParam;
ReMatchWildcards:=EmptyParam;
ReMatchSoundsLike:=EmptyParam;
ReMatchAllWordForms:=EmptyParam;
ReForward:=True;
ReWrap:=wdFindContinue;
ReFormat:=EmptyParam;
ReReplaceWith:=EmptyParam;
ReReplace:=wdReplaceAll;
SelectRange.Find.Execute(ReFindText,ReMatchCase,
ReMatchWholeWord,ReMatchWildcards,
ReMatchSoundsLike,ReMatchAllWordForms,
ReForward,ReWrap,ReFormat,
ReReplaceWith,ReReplace);
end;

判断标签是否存在：
ThisDoc.Bookmarks.Exists('标签1')
得到标签的位置：
ThisDoc.Bookmarks.Item('标签1').Get_Start;
ThisDoc.Bookmarks.Item('标签1').Get_End_;

可以，用书签就行