Is there a way when a cell is selected in a procedure when the procedure is
done that cell is in the top left portion of the screen?
Thanks

Sub demo()
Set r = Range("Z100")
Application.Goto r, scroll:=True
End Sub
--
Gary''s Student - gsnu200768


"ranswert" wrote:

> Is there a way when a cell is selected in a procedure when the procedure is
> done that cell is in the top left portion of the screen?
> Thanks

Hi,

Replace example references with desired cell.

Application.Goto Reference:=Worksheets("Sheet1").Range("A154"), _
Scroll:=True

Cheers
Andy

ranswert wrote:
> Is there a way when a cell is selected in a procedure when the procedure is
> done that cell is in the top left portion of the screen?
> Thanks

--

Andy Pope, Microsoft MVP - Excel
http://www.andypope.info

I tried your example with the following changes:

set ycell = range(costid)
Application.Goto ycell, Scroll:=True

costid is a named cell in my worksheet

when i try to run this I get an error

What am I doing wrong?
Thanks

"Gary''s Student" wrote:

> Sub demo()
> Set r = Range("Z100")
> Application.Goto r, scroll:=True
> End Sub
> --
> Gary''s Student - gsnu200768
>
>
> "ranswert" wrote:
>
> > Is there a way when a cell is selected in a procedure when the procedure is
> > done that cell is in the top left portion of the screen?
> > Thanks

set ycell = range("costid")

otherwise Excel thinks you are using a variable called costid.
--
Gary''s Student - gsnu200768

I am using costid

'dim costid as string" is how I declare it.

"Gary''s Student" wrote:

> set ycell = range("costid")
>
> otherwise Excel thinks you are using a variable called costid.
> --
> Gary''s Student - gsnu200768

Sub demo()
Dim costid As String
costid = "costid"
Set ycell = Range(costid)
Application.Goto ycell, scroll:=True
End Sub

This assumes that you have Defined the Name in the worksheet.

--
Gary''s Student - gsnu200768

costid is a variable string that changes depending which cell I want to
reference. costid is set to = "cst01 or cst02 or csto3, etc." depending on
which cell I want to select.
"cst__" are all defined names in a worksheet. I think that I am doing
something wrong with the reference to those cells.

"Gary''s Student" wrote:

> Sub demo()
> Dim costid As String
> costid = "costid"
> Set ycell = Range(costid)
> Application.Goto ycell, scroll:=True
> End Sub
>
> This assumes that you have Defined the Name in the worksheet.
>
> --
> Gary''s Student - gsnu200768

We are nearly there. If, in the worksheet, we assign the Name costid to Z100
or AB10 or any other cell address, the code will work.

The key issue is that in VBA we can use "costid" just like "A1". The
meaning of "costid" is defined in the worksheet and can change to any cell
address you desire.
--
Gary''s Student - gsnu200768

I'm sorry I'm not explaining it well. The actual defined name for the cells
are cst01,cst02,etc. I have written a code where costid is a variable that
gets assigned a value of cst01 or cst02 or etc. Then I set ycell =
range(costid) , which I think is setting ycell = range("cst01") or what ever
cst__ is identified. Then I am trying to put that cell in the top left
corner of the screen. I hope that that all makes sense.


"Gary''s Student" wrote:

> We are nearly there. If, in the worksheet, we assign the Name costid to Z100
> or AB10 or any other cell address, the code will work.
>
> The key issue is that in VBA we can use "costid" just like "A1". The
> meaning of "costid" is defined in the worksheet and can change to any cell
> address you desire.
> --
> Gary''s Student - gsnu200768