Copy with Selection Test [Sub-Macro]

This is awesome, thanks.