51Testing软件测试论坛

标题: 求一断VBS脚本，需要实现如下功能 [打印本页]

作者: ttabc123 时间: 2011-6-15 15:04
标题: 求一断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文件运行的时候，出错，请问是为什么？
[attach]73575[/attach]最好word2003,2007,excle2003,,2007,都能实现以上功能谢谢

作者: ttabc123 时间: 2011-6-15 17:06
自已研究了下，写了这些代码

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
点不到吧？

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)