我制作单位收费软件，很好用，但是遇到一个难题，自动生成合同时，需要对"标题" 进行排版由5号字改成3号字 并且居中。谢谢

用录制宏的方法可以得到。
ow=CREATEOBJECT("WORD.APPLICATION")
ow.Documents.Open(GETFILE())&&打开已有文档
ow.VISIBLE=.T.  &&显示打开的文档
ow.Selection.MoveUp(5,29)  &&光标到页首
ow.Selection.HomeKey(5)  &&光标到行首
ow.Selection.MoveDown(5,1,1)  &&按住Shift键下移一行（选定一行，中间参数行数）
ow.Selection.ParagraphFormat.Alignment = 1  &&居中
ow.Selection.Font.Size = 22   &&字体大小22磅
ow.ActiveDocument.Save     &&保存
ow.Quit

  谢谢，我明天去研究一下，这下能解决大问题了

谢谢

[ 本帖最后由 caohongyi 于 2012-3-17 10:10 编辑 ]

vfp如何控制word的页眉页脚