Once to get the thing ungrouped and leave it selected, leaving you with the b/g object and the other objects in a group; then again to ungroup to its components and leave them selected:
Selection.ShapeRange.Ungroup.Select
Selection.ShapeRange.Ungroup.Select
Tested it on a couple different simple EPS imports and an EMF/WMF; works with all of them.
Understand, though, that the way Office handles EPS is something of an abortion; always has been. At least this time round, they do the wrong thing for generally right reasons.