我可以更改 Word 2007 中“插入表格”命令的行为吗？

Question

在 Word 2007 中，“插入”功能区选项卡有一个“表格”组，其中有一个下拉按钮（标记为“表格”）。

下拉列表包含各种菜单项，例如“插入表格...”、“绘制表格”等。但是，在下拉列表的顶部有一个 10x8 网格，您可以使用它来快速选择表格的大小。使用鼠标新建表格。 （第一个问题：这东西到底叫什么？！！）。

我想覆盖默认行为，以便当用户使用上面提到的小部件“绘制”表格时，我可以更改表格中使用的段落样式（也许还可以进行一些其他清理）。

我知道如何覆盖“插入表...”命令，但我不知道如何覆盖“小部件”的行为。能做到吗？

Answer 1

在你继续阅读之前（因为这会很长）我想说我没有解决这个问题。然而，在我尝试解决并解决这个问题时，我发现了很多事情，我将其记录在这里，希望它们能帮助其他人找到解决方案。

在尝试确定可用于插入表格的 10x8 网格的控件时，我发现了 Word 命令中列出的一个名为“TableInsertGeneral”的宏。

根据 Suzanne S. Barnhill 的说法，如果此功能停止，该宏将恢复网格早期版本的 Word 中的函数 (插入表格下拉菜单丢失）。该宏存在于 Word 2007/2010 中，无法从宏对话框的“运行”按钮执行。双击该命令会关闭该对话框，但不会明显执行任何其他操作。我还尝试通过创建一个名为 TableInsertGeneral 的 VBA 子程序来拦截其功能，但是当我访问网格时，我放入此子程序中的代码似乎并未执行。然而，根据我的研究，我相信 TableInsertGeneral 宏确实与显示 10x8 网格有一些联系。

我还尝试通过更改 Word 功能区中的表格库来解决该问题。因为我无法直接访问控制网格的任何代码，所以我尝试隐藏表格库，然后将其替换为排除网格功能的重建库（从而允许段落样式和其他更改全局工作）。

首先，我下载了一些工具：

• Microsoft Office 的自定义 UI 编辑器（用于编辑功能区：Office 自定义 UI 编辑器）
• Office 2007 控件 ID（用于标识各个功能区部分的名称：Excel 工作表中的 Office 2007 控件 ID)
• Office 2007 图标库（用于访问 Word 中的内部图标以放置在重建的功能区中：Word 2007 图标库）

使用自定义 UI 编辑器对于 Microsoft Office（它允许编辑 Word 2007 文档或模板中的 customui.xml 文件，而无需创建文件夹结构或维护 xml 文件之间的关系），我打开了一个模板并将此代码保存在文件：

<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<customUI xmlns="http://schemas.microsoft.com/office/2009/07/customui">
<ribbon>
  <tabs>
    <tab idMso="TabInsert">
      <group idMso="GroupInsertTables" visible="false" />
      <group id="CustomGroupInsertTables" label="Tables" insertBeforeMso="GroupInsertIllustrations">
       <gallery id="CustomTableInsertGallery"
        label="Table"
        imageMso="TableInsertGallery" 
        size="large"
        columns="1" 
        rows="4"
        screentip="Table"
        supertip="Insert or draw a table into the document."
        keytip="T" 
        onAction="RibbonControl.galleryOnAction" >
        <item id="GridMessage" label="Draw Table Via Grid Has Been Removed" imageMso="TablesGallery" 
         supertip="Provides information on why this template has different Ribbon controls."/>  
        <button idMso="TableInsertDialogWord" />
        <button idMso="ConvertTextToTable" />
        <button idMso="TableExcelSpreadsheetInsert" />
       </gallery>
     </group>
    </tab>
  </tabs>
</ribbon>
</customUI>

这成功隐藏了原始表库，并用原始表库的一些功能替换了它。 10x8 网格消失了，但我无法恢复“绘图表”切换按钮和“快速表”库。据我所知，XML 架构不允许将其中任何一个（存在于 Word 2007 的开箱即用版本中）嵌入到现有图库中。因为我不喜欢删除功能（即使对于这个部分解决方案，我认为不会使用它），我添加了一个绑定到消息框的按钮作为重建库中的第一项：

用于连接新的“通过网格绘制表格已删除”按钮的代码被放置在名为 RibbonControl 的模块中：

Sub GalleryOnAction(Control As IRibbonControl, selectedID As String, selectedIndex As Integer)

If Documents.Count = 0 Then
 MsgBox "This control is disabled when there is no active document."
 Exit Sub
End If

Select Case Control.id
  Case "CustomTableInsertGallery"
    Select Case selectedIndex
      Case 0
        MsgBox "Explain changes to Ribbon interface here."
      Case Else
        'Do Nothing
    End Select 
End Select
End Sub

我不希望有人使用这个部分解决方案，然而，如果可以找到恢复两个缺失控件的方法，这可能是一个很好的解决方法。顺便说一句，我改编自 Greg Maxey 的网站：

自定义功能区

如果您读到这里，谢谢！祝愿你通过自己的努力取得更大的成功。