使用VBA编程实现word公式编辑代码

发两个文件到908856685@qq.com，应该可以实现。以下是word中的主要代码：

subtest()

dimxcelasnewexcel.application

dimxwbkasexcel.workbook

dimxshtasexcel.worksheet

setxwbk=xcel.workbooks.open("d:xxxmemo+browse.xlsx",0,1)

setxsht=xwbk.sheets(1)

msgboxxsht.range("a2")

xwbk.close0

xcel.quit

setxcel=nothing

endsub