I run a macro to look for a value in a cell. When it is found I exit the
routine and select the entire row of the active cell for the user to see.
However, sometimes the row itself is beyond the view of the user (i.e. Row
100). Upon selecting the entire row, how do I change the screen view (scroll
down) so that that row is visible to the user? That is selecting it is
useless if the view cannot even see it.

Thanks

Hi ExcelMonkey,

Try something like:

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


---
Regards,
Norman



"ExcelMonkey" wrote in message
...
I run a macro to look for a value in a cell. When it is found I exit the
routine and select the entire row of the active cell for the user to see.
However, sometimes the row itself is beyond the view of the user (i.e. Row
100). Upon selecting the entire row, how do I change the screen view
(scroll
down) so that that row is visible to the user? That is selecting it is
useless if the view cannot even see it.

Thanks

For that to work do I not have to set a an object variable to the cell
address and then used that object variable in the Range propetly?

Dim ViewAddress As Object
Set ViewAddress = ActiveCell.Address

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


Does that sound right?
"Norman Jones" wrote:

Hi ExcelMonkey,

Try something like:

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


---
Regards,
Norman



"ExcelMonkey" wrote in message
...
I run a macro to look for a value in a cell. When it is found I exit the
routine and select the entire row of the active cell for the user to see.
However, sometimes the row itself is beyond the view of the user (i.e. Row
100). Upon selecting the entire row, how do I change the screen view
(scroll
down) so that that row is visible to the user? That is selecting it is
useless if the view cannot even see it.

Thanks

Hi ExcelMonkey,

With a hardcoded range, the suggestion works unamended.

To use a range variable, try:

Dim ViewRng As Range

Set ViewRng = Worksheets("Sheet1").Range("A100")

Application.Goto Reference:=ViewRng, Scroll:=True


---
Regards,
Norman



"ExcelMonkey" wrote in message
...
For that to work do I not have to set a an object variable to the cell
address and then used that object variable in the Range propetly?

Dim ViewAddress As Object
Set ViewAddress = ActiveCell.Address

Application.Goto Reference:=Range(ViewAddress),
Scroll:=True


Does that sound right?
"Norman Jones" wrote:

Hi ExcelMonkey,

Try something like:

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


---
Regards,
Norman



"ExcelMonkey" wrote in message
...
I run a macro to look for a value in a cell. When it is found I exit
the
routine and select the entire row of the active cell for the user to
see.
However, sometimes the row itself is beyond the view of the user (i.e.
Row
100). Upon selecting the entire row, how do I change the screen view
(scroll
down) so that that row is visible to the user? That is selecting it is
useless if the view cannot even see it.

Thanks