您好,AG。现在,这个问题使我们想起了以前的故事。当我们的编辑加入这个团队时,他首先做的事情之一就是使得我们重做已经为“脚本编写第 2 周”网络广播制作的整捆的屏幕快照。为什么?因为她认为屏幕快照中不应该包含我们在处理“脚本中心”的内容时使用的自定义 Microsoft Word 工具栏。因此,我们必须打开 Word,隐藏工具栏,然后重做所有屏幕快照。如果当时我们有类似您所需要的脚本,我们就不需要手动打开 Word,然后隐藏工具栏。即使当时不能节省大量时间,但也…。
|
注意。我们有时也取笑我们的编辑,但我们确实从未报怨她什么。当然,如果每天早晨她都能将扫帚放在同一个位置会更好,但除了…。 |
好了,让我们言归正传。您想要一个可以在 Microsoft Word 中隐藏某个特定工具栏的脚本,对吗?唔,下面的这个简单的小脚本怎么样,这个脚本隐藏格式工具栏:
Set objWord = CreateObject("Word.Application")
objWord.Visible = True
Set objTool = objWord.CommandBars("Formatting")
objTool.Visible = False
您可以看到,它是一个简单的任务 - 隐藏工具栏 - 因此,也是一个简单的脚本。首先创建 Word.Application 对象的一个实例,然后将 Visible 属性设置为 True(以使我们能看到进展的情况)。然后,我们使用这行代码创建一个引用格式工具栏(Word CommandBars 集合的一部分)的对象:
Set objTool = objWord.CommandBars("Formatting")
要隐藏此工具栏,只需将此工具栏的 Visible 属性设置为 False。如果我们要显示此工具栏,只需将 Visible 属性设置为 True。
毫无疑问,我们立即会想到这个问题:我们怎样知道此特定工具栏的名称是格式?如果在 Word 中单击视图菜单,然后单击工具栏,就可以看到可用工具栏的列表。在此菜单中显示的名称与在脚本中使用的名称相同。
|
注意。难道我们不能列举 CommandBars 集合中的所有项来检索工具栏名称的列表吗?当然能。但是,遗憾的是,CommandBars 集合还包括菜单、快捷方式菜单和子菜单,好像没有可以用程序将工具栏与其他项分开的方法。因此,最好的方法就是打开 Word,然后查看工具栏名称。 |
我们上面显示的脚本实际上是打开 Word,隐藏工具栏,然后使 Word 保持打开状态。如果您希望只配置工具栏设置,而看不到任何屏幕变化,您可以使用下面的这个脚本。这个脚本在隐藏的窗口中启动 Word,隐藏此工具栏,然后退出程序。您将看不见任何屏幕变化,但是下次启动 Word 时将隐藏“格式”工具栏:
Set objWord = CreateObject("Word.Application")
Set objTool = objWord.CommandBars("Formatting")
objTool.Visible = False
objWord.Quit
我们最后应指出的一点是(正如我们看到的),隐藏 Word 中的某个工具栏是可能的。但是,这个工具仍然可用。它只是在此刻不可见。不论好坏(可能更好),您不能删除任何 Word 内置工具栏;您能做的只是从视图隐藏这些工具栏。
不管怎样,谢谢您的问题,AG。现在,我们想问您一个问题。我们想送给我们的编辑一个小纪念品,表示我们的感谢,但是我们不知道在西雅图地区哪里可以找到蝾螈眼。您有何建议?
|
编辑附注。以上部分纯属虚构(除了脚本编写资料)。无论过去或现在如与编辑经历雷同则纯属巧合。尽管编辑现在还没有雷同之处。过去吗,嗯…。 |