選択エレメントの取得

2016/9/1 (Thu)2017/12/9 (Sat)

Dim pGCS As IGraphicsContainerSelect
Set pGCS = pMxDoc.PageLayout
 
Dim pElement As IElement
Set pElement = pGCS.SelectedElement(0)