Greg
Without the DoEvents, on my machine the selection doesn't change so I think we can say there is variable behaviour with the selection.
Another alternative you might also add to the experiment list is to add the temp doc invisibly. Is it closing the temp doc that is the issue on your machine or changing the activedocument?
Code:
Set oDocTmp = Documents.Add(Visible:=False)