level 1
一段代码,放在Sub和End Sub之间作为Word的宏是可以用的,但是加上Set objWord = CreateObject("Word.Application") 之后作为VBS文件就不行了。Word报错用于创建此对象的程序未安装或未响应。请大家帮助。
2012年03月13日 04点03分
1
level 1
代码如下
Selection.InlineShapes.AddOLEObject ClassType:="Equation.3"
'输入积分符
SendKeys "{F2}", True SendKeys "{LEFT}" & "{LEFT}" & "{LEFT}" & "{LEFT}" & "{LEFT}", True
SendKeys "{ENTER}", True
SendKeys "{ENTER}", True
'退出公式编辑器
SendKeys "{ESC}", True
SendKeys "{ENTER}", True
2012年03月13日 04点03分
2