请教各位同学：如何通过vb编程给word表格单元格设置底纹！谢谢！
通过命令建了一个新文档，并且建立了一个表格，
但给表格单元格设置底纹颜色没有找到命令！
特来请教各位DX！谢谢！

难道是遇到死问题了？！

录制宏代码，有内容吗？

录得宏代码，供参考
With Selection.Tables(1)
    With .Shading
     .BackgroundPatternColor = wdColorBlue
    End With
End With

谢谢！！！

下面的代码将文档中的所有表格设置底纹为15%灰度，楼主可根据需要修改颜色常量。

Sub 设置底纹()
    Dim oTbl As Table
    For Each oTbl In ActiveDocument.Tables
        oTbl.Shading.BackgroundPatternColor = wdColorGray15
    Next oTbl
End Sub