visGeekのプロフィール

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