How to create a Macro to pull data and paste to a new, blank worksheet?

[seize]

Hey everyone. I'm very new to excel and fairly confident a macro can achieve the desired results for the problem below. All help is greatly appreciate!

Situation:

I have a series of lines with domain names, i.e.

abc.com
abc.net
def.com
def.net
ghi.net
xyz.com

First, I'll be using the Replace All function to remove all .com extensions. Doing so leaves me with the following:

abc
abc.net
def
def.net
ghi.net
xyz

My problem lies in that I need to copy all instances without an extension to a new, blank worksheet. The final worksheet would look like:

abc
def
xyz

A know a macro to accomplish all this is the answer I just don't know how to do it. Any advice is greatly appreciated! Thank you!

David