如何让实体一直保持高亮

cctv2cctv

我是作图纸管线预算的，我已编了一个vba可以计算线的长度，

希望先用 "快速选择" 让设备（设备是块作成的图）高亮显示，然后用vba宏计算连接设备线的长度。

但块高亮后执行自己的vba宏，亮度会被取消，有什么办法让块一直保持高亮同时又能运行vba宏

(如果改变块参照的属性颜色之类用起来也不是很方便)

雪山飞狐_lzh

用(vla-runmacro (vlax-get-acad-object) "宏名")的形式调用宏，不要用vbarun命令