I need a button to go to the cell containing what ever I type into A1 on
the same sheet. For example if I type in AF-1 and click the button, it
scrolls jumps to that cell.


--
Optitron
------------------------------------------------------------------------
Optitron's Profile: http://www.excelforum.com/member.php...o&userid=26729
View this thread: http://www.excelforum.com/showthread...hreadid=467544

Goo afternoon Optitron

Sub Jump()
a = Range("A1").Value
Range(a).Activate
End Sub

Type the code above into an empty macro module. Once done, draw
button using the forms bar, assign the macro Jump to the button an
that will do the trick. But use the syntax AF1, not AF-1.

HTH

Dominic

--
dominic
-----------------------------------------------------------------------
dominicb's Profile: http://www.excelforum.com/member.php...fo&userid=1893
View this thread: http://www.excelforum.com/showthread.php?threadid=46754

Whoops...I meant to say "AF-1" as in; that's the contents of the cell I
want to go to, not cell AF1. Basically I'm trying to get to the name of
a toolbox on a list of 3000 rows without scrolling there.


--
Optitron
------------------------------------------------------------------------
Optitron's Profile: http://www.excelforum.com/member.php...o&userid=26729
View this thread: http://www.excelforum.com/showthread...hreadid=467544

Hi Optitron

OK. Take two...!

Sub TryThisInstead()
a = Range("A1").Value
Cells.Find(What:=a).Activate
End Sub

HTH

DominicB


--
dominicb
------------------------------------------------------------------------
dominicb's Profile: http://www.excelforum.com/member.php...o&userid=18932
View this thread: http://www.excelforum.com/showthread...hreadid=467544

Public Sub FindValue()
Dim wks As Worksheet

Set wks = ActiveSheet

wks.Cells.Find(wks.Range("A1").Value, wks.Range("A1")).Select
End Sub

--
HTH...

Jim Thomlinson


"Optitron" wrote:


Whoops...I meant to say "AF-1" as in; that's the contents of the cell I
want to go to, not cell AF1. Basically I'm trying to get to the name of
a toolbox on a list of 3000 rows without scrolling there.


--
Optitron
------------------------------------------------------------------------
Optitron's Profile: http://www.excelforum.com/member.php...o&userid=26729
View this thread: http://www.excelforum.com/showthread...hreadid=467544

That did it, thanks dominicb

--
Optitro
-----------------------------------------------------------------------
Optitron's Profile: http://www.excelforum.com/member.php...fo&userid=2672
View this thread: http://www.excelforum.com/showthread.php?threadid=46754