What's wrong with this macro?

So it looks like I need a Pause for each pick within the ExtractMeshPart command? Your macro works well with 1 pick, but not many. I need to be able to select multiple faces. What I am after in general is automated way to get an outline of a mesh part, ideally without even affecting the mesh.
(a WISH for V6? )

thanks