这里有新手问题。
在visio项目中,我想编写VBA来快速更改原理图中的线条属性。 到目前为止,它是可行的,除非行在组中。有什么想法吗?
这是我当前正在使用的代码:
Dim shp As Visio.Shape
For Each shp In Visio.activeWindow.Selection
'// Add cell and formula/results here:
shp.Cells("linecolor") = 0
Next shp
Set shp = Nothing
End Sub
谢谢!