A family of Microsoft spreadsheet software with tools for analyzing, charting, and communicating data.
You do not need to select anything to do what you want... just copy it into place. Using the code approach I posted...
Intersect(Range("A:B,D:G"), ActiveCell.EntireRow).Copy Range("A12")
NOTE: Please mark the message or messages (yes, you can mark more than one) that answer your question as the "Answer" so that others will know your question has been resolved.