• ベストアンサー

visioマクロ

子シェイプの取得ができません。 visioの図面でシェイプを選択してVB上で 取得する方法ですが、 グループシェイプの親とグループ化されていないシェイプは 以下の方法で取得できます。 Set selObj = visAppObj.ActiveWindow.Selection Set shpObj = selObj.Item(1) でもグループ化したシェイプ内の子シェイプは上記の 方法では取得できませんでした。 子シェイプを取得するよい方法があったら教えてください。

質問者が選んだベストアンサー

  • ベストアンサー
  • visGeek
  • ベストアンサー率100% (1/1)
回答No.1

ActiveWindow.Selection(1).Shapes(1) で、どうぞ。

biruko
質問者

お礼

visGeekさん ご回答ありがとうございます。 おかげさまで解決しました。

関連するQ&A