在你继续阅读之前(因为这会很长)我想说我没有解决这个问题。然而,在我尝试解决——然后解决——这个问题的过程中,我发现了很多东西,我在这里记录下来,希望它们能帮助其他人找到解决方案。
在尝试确定可用于插入表格的 10x8 网格控件时,我发现在名为“TableInsertGeneral”的 Word 命令中列出了一个宏。

根据 Suzanne S. Barnhill 的说法,如果此功能在早期版本的 Word 中停止运行(插入表格下拉缺失),此宏将恢复网格。该宏存在于 Word 2007/2010 中,无法从宏对话框的“运行”按钮执行。双击该命令会关闭对话框,但不会公开执行任何其他操作。我还尝试通过创建一个名为 TableInsertGeneral 的 VBA 子程序来拦截它的功能,但是当我访问网格时,我放入该子程序的代码似乎没有被执行。但是,根据我的研究,我相信 TableInsertGeneral 宏确实与显示 10x8 网格有一些联系。
我还尝试通过更改 Word 功能区中的表格库来解决此问题。因为我无法直接访问任何控制网格的代码,所以我尝试隐藏表格库,然后将其替换为排除网格功能的重建库(从而允许段落样式和其他更改在全局范围内工作)。
首先我下载了一些工具:
使用 Microsoft Office 的自定义 UI 编辑器(它允许编辑 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 网格消失了,但我无法恢复 Draw Table 切换按钮和 Quick Tables 库。据我所知,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 的网站上改编了大部分内容:
自定义功能区
如果你读到这里,谢谢!我希望你通过自己的尝试取得更大的成功。