如何索引从外部粘贴到word中的图形对象

对于非“嵌入型”的图形对象，在粘贴时该图形对象是被选择的，所以只要在执行粘贴命令后，立即用“Dim shpAs Shape: Set shp = Selection.ShapeRange(1)” 来返回粘贴进来的那个图形对象。

对于“嵌入型”对象，在粘贴后，光标插入点是紧跟在嵌入型图片的后面的，此时，只要用Selection.MoveLeft(wdCharacter,1, wdExtend)，也就相当于按住Shift，再按下方向“左”键，即可将此粘贴进来的嵌入式图形对象选中，然后就可以用“Dim shp As Shape: Set shp = Selection.ShapeRange(1)”来索引此图形了。