使用VBA编程Visio 2013中的命令按钮以打开图层属性窗口

Question

这是我一直试图解决的问题。我不知道VBA，我还在努力学习。我在Visio 2013中创建了用于工作的图表，图表使用了图层。我正在尝试在命令按钮中编码以打开用户单击按钮的活动页面的图层属性窗口。我已经浏览了Visio的Microsoft文档页面，但是我无法找到如何将图层属性窗口作为对象引用以及如何使用VBA运行它。这是我到目前为止尝试过的不同迭代;

Private Sub CommandButton1_Click()
Visio.Page.Layers.Properties("NameofPage").Run 
End Sub

我非常感谢有关此事的任何帮助和指导。我甚至不确定我做错了什么。

Answer 1

在ms visio中，您只能为活动页面显示图层属性窗口！

  

Application.DoCmd（visCmdLayerSetupDlg）