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）