0

我认为这将是一项简单的任务:通过 VBA 从选定的形状中删除线条/边框。

( set shp = ActiveWindow.Selection.ShapeRange(1))

第一次尝试:shp.line.weight = 0--> 形状周围还有一条很细的线。有趣:通过 GUI 的相同行为:如果我将线宽设置为 0,仍然可以看到一条非常细的线。

第二次尝试:shp.line.visible = false--> 线条消失,但在 GUI 中没有选择“无线条”、“单色线条”、“渐变线条”三个选项。取消选择并再次选择形状让“单色线”闪烁,但最后没有选择任何选项。诡异的 ...

这是一个已知的错误?是否有另一个 VBA 选项来禁用该行?

我尝试过的其他方法:我检查了我通过 GUI 设置“无线”line.styleline.dashstyle形状。两个值都是-2。但是无法通过 VBA 设置这些值(错误没有有效值)

(办公室 365)

4

1 回答 1

0

尝试先选择形状。然后在上面写你的代码之一

于 2021-09-21T17:07:32.013 回答