无法设置表格样式

Question

当我尝试运行以下任一宏

时

Sub Label()
'
' Label Macro
'
'
    ActiveDocument.MailMerge.MainDocumentType = wdMailingLabels
    Selection.Tables(1).Style = "Table Grid"
    ActiveDocument.Save
End Sub
Sub labels()
'
' labels Macro
' creation of labels
'
    ActiveDocument.MailMerge.MainDocumentType = wdMailingLabels
    Selection.Tables(1).Style = "Table Grid"
End Sub

我收到以下错误

在线上说

Selection.Tables(1).Style = "Table Grid"

我做错了什么？

Answer 1

您指的是Selection.Tables，这意味着您只能引用当前选定的对象。但是你的宏没有选择任何东西，所以最后它指的是不存在的对象。

尝试this主题修改代码以正确引用该表。