软件测试论坛 › [QuickTest Professional] › 求一断VBS脚本，需要实现如下功能

ttabc123 发表于 2011-6-15 15:04:46

求一断VBS脚本，需要实现如下功能

本帖最后由 ttabc123 于 2011-6-15 17:06 编辑

vbs实现如下功能，需求：把word中的限制权限添加到最上方的工具栏 。如下图
自已研究了下，写了这些代码
Set objWord = CreateObject("Word.Application")
objWord.Visible = True
Set cbar1 =CommandBars.Add(Name:="权限", Position:=msoBarFloating)
cbar1.Visible = True
但保存vbs文件 运行的时候，出错，请问是为什么？
最好word2003,2007,excle2003,,2007,都能实现以上功能谢谢

ttabc123 发表于 2011-6-15 17:06:51

自已研究了下，写了这些代码

Set objWord = CreateObject("Word.Application")
objWord.Visible = True
Set cbar1 =CommandBars.Add(Name:="权限", Position:=msoBarFloating)
cbar1.Visible = True
但保存vbs文件 运行的时候，出错，请问是为什么？

traning 发表于 2011-6-15 17:29:55

点不到吧？

查看完整版本: 求一断VBS脚本，需要实现如下功能