vbaによる選択から機能を特定する

[Adahm]

全てに

vba コマンドで

oobj = thisapplication.commandmanager.pick(kallentitiesfilter, "..." を設定する

associo 広告 なし オブジェクト 選択。
選択したエンティティティが選択されていることを検証します。 フェイス ログイン エッジ (研究を制限するには、型オブジェクトを除く) バージョン)。

トラミン

oobj.parent.name(オブジ)

私は見つける ボディ 誰が属しているのか、私は彼を見つけることができません 特徴:お問い合わせ
ファイルのすべての機能と関連した顔やエッジをスクロールすることなく、見つけることができるかどうかは誰が知っていますか?
非常に大きなファイルなので、少しレイテンシが生成されます。

お問い合わせ

 

[Adahm]

可能です。 @キャッチャー 解決策はありません...:クール:

 

[Catafratto]

. . .

パブリックサブファインダー()
dim opartとしてpartdocument
opart = thisapplication.activedocument を設定する
debug.print opart.fullfilename

'facceごとのテスト
顔としての顔
set oface = thisapplication.commandmanager.pick(kallentitiesfilter, "...")
debug.print oface.createdbyfeature.name の

'spigoliごとのテスト
縁のエッジとして
set oedge = thisapplication.commandmanager.pick(kallentitiesfilter, "...")
debug.print oedge.faces.item(1).createdbyfeature.name

エンドサブ

 

[Adahm]

お問い合わせ
お問い合わせ