在Word中将“允许单元格之间的间距”设置为false

时间:2019-05-17 20:40:16

标签: vba ms-word

基本上,尝试使用VBA关闭此选项。有一些使用默认样式的解决方法,但随后我必须将其分发到每个工作站。最好以编程方式处理它。

我取消了它,因为它使表看起来像垃圾。我尝试过的:

wd.ActiveDocument.Tables(c).Spacing = CentimetersToPoints(0)
wd.ActiveDocument.Tables(c).Spacing = 0

实际上并没有像设置为false那样摆脱间距。

With Dialogs(wdDialogTableTableOptions)
    .AllowSpacing = -1
    .Execute
End With

什么也没做。

还有其他建议吗?

enter image description here

1 个答案:

答案 0 :(得分:0)

再次,在发布后立即偶然发现解决方案:

' Turn off cell spacing to get around some formatting issues
With wd.Dialogs(wdDialogTableTableOptions)
    .AllowSpacing = False
    .Execute
End With

在我的情况下,我从Access中创建了Word.Application对象,却忽略了将wd.对象放在上面...糟糕。