Dare I ask is there a way to get the active cell that I
goto with the use of your incredible macro that will
position the active cell approximately mid screen or
atleast at almost mid screen so I can read what is above
and below the active looked up cell for a few rows.

thanks
-----Original Message-----
What I sent precludes the need for the find dialog box.
If you want it to move 2 cells to the LEFT, then change
the ,2 to ,-2

Maybe I didn't understand your needs. Perhaps more detail
would be helpful.

wrote in message
...
Thanks but instead of jumping to the 2 left of the item
positon I need it jumps to the right of the found item
by
2 spaces

Also when I run it it pops up a dialog box - I need it
to
read the number in the find dialog box then jump
directly
to the found item location - well 2 columns to the left
of
the found item on the sheet.

Thanks
-----Original Message-----
try this
Sub gotoselection()
x = Cells.Find(InputBox("Enter number to
find")).Address
Application.Goto reference:=Range(x).Offset(, 2)
End Sub

"Todd" wrote in
message
...
Is it possible to program a macro that would allow
me to
jump from the find box to the cell of the found item
after
I do a find and even better would be to jump to a
location
that would be two columns to the left of the found
value.

For example I type "3876" in the find box so then I
want
to jump to a position on the sheet 2 columns to the
left
of the 3876.

This is for a highly repeatable data entry task that
will
be ongoing.

Thanks Todd


.



.