一条斜线穿过一个圆 ,现要把圆里的弦给去掉 ,用VBA怎样可以实现它
一条斜线穿过一个圆 ,现要把圆里的弦给去掉 ,用VBA怎样可以实现它
2楼
Sub 打断一次()
ThisDrawing.SendCommand "(command ""TRIM"" """" pause """")" & vbCr
End Sub
Sub 连续打断()
ThisDrawing.SendCommand "TRIM" & vbCr & vbCr
End Sub
如果需要打断的对象很多,可以编写自动打断的程序,需要用到IntersectWith方法。
回复