x = selection.column is the answer I was looking for. Thanks for the
range hint too.

This is my first foray into VB. I spend most of my time making metal
things so I have a lot of reading to do to understand how your last
script works.

Am I to understand:

"Application.ScreenUpdating = False" disables cell  updating so Excel
doesn't go through the steps of reupdating the entire data  set?