Do you mean search down 100 columns to the right, or search down then 100
columns to the right? If the later

Range(Selection, Selection.End(xlDown)).Offset(0,100).Select


--

HTH

RP
(remove nothere from the email address if mailing direct)


"havocdragon" wrote in message
...
Hey all. I am sure you all have seen the basic code listed below. What I
need
to know is how to change the "Selection.end(xldown)" part to a variable
place, like 100 columns to the right?


Range(Selection, Selection.End(xlDown)).Select