some approaches are more robust than others. for example, cells can take a
number variable in both arguments

i = cells(activecell.Row,256).End(xltoLeft) + 1
cells(activecell.Row, i) = "Something"

would put something in the next available column of the row of the
activeCell

as an example.

--
Regards,
Tom Ogilvy

"Carl" wrote in message
...
Thanks. Works as desired. I can see from previous poster there are
several ways to code a line (AKA - skin a cat).

Carl


On Thu, 17 Mar 2005 08:07:48 -0500, "Tom Ogilvy"
wrote:

cells(activeCell.row,2).Select