Add this line to the beginning of your code:
Code:
Selection.WholeStory
This is the VBA code for select all (Ctrl+A). If you ever want to see what something you do a lot of looks like in code, just click on "Record Macro" in the "Code" section of the Developer tab and repeat the procedure. Stop recording once you're done and have a look at the code for the macro you just recorded.